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Het serieuze gebruik van 
de computer gaat dit jaar 
echt doorbreken. De na- 
druk gaat verschuiven van 
spelletjes naar toepassin¬ 
gen, waar je wat aan hebt. 
Meer tekstverwerking, 
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meer gebruik voor be¬ 
standsbeheer, meer tele¬ 
communicatie. We gaan 

. 

dan ook als blad mee in die 
richting, want bij die toe¬ 
passingen horen ook ande¬ 
re software, andere pnn- 
ters en randapparatuur en 
andere listings. Commo¬ 
dore zelf zit al een tijd op 
deze toer, dat bleek al met 
de C-128. Met de PQ de 
nieuwe PC AT en zeker 
ook uit de introductie van 
de Amiga kunnen we aflei¬ 
den, dat CBM de door- 
groei van de vele hon¬ 
derdduizenden 64 gebrui¬ 
kers in ons land naar haar 
. 

• * ... 

eigen serieuze micro s vei¬ 
lig wil stellen. 

■ 

Dat is prima , wat ons be¬ 
treft, maar in die segmen¬ 
ten is ook de concurrentie 

■ 

in het aanbod geweldig, 
en dus moet Commodore 
heel goede spullen tegen 
een aantrekkelijke prijs le- 
veren, Recente prijsverla¬ 
gingen van de Amiga in 
Amerika en de PC hier ge¬ 
ven aan, dat men zich daar 
ook wel van bewust is. 
Commodore wil duidelijk 
de grootste factor op de 
computermarkt blijven, 
ook nu die verschuift van 

de hobby- naar de se- 

"> 

neuze toepassingen. 




CD-ROM 64 

Meer, steeds meer gege¬ 
vens per schijfje, en Philips 
bedenkt wel weer een 


Missers 

In dit nummer geen fouten 
uit eerder gepubliceerde lis¬ 
tings. 


Inhoud van dit nummer 


Nieuws 5 

Nieuwe produkten uit bin¬ 
nen- en buitenland, zoals de 
Commodore AT, die tijdens 
de Hannover Messe werd 
getoond. 


Datakolom 10 

Luc Sala ziet wel wat in 
"Schoolbank” publishing, 
de computer nog dichter bij 
de gebruiker. 


1541 Bestands¬ 
beheer 11 

Het maken van goede data¬ 
bestanden vraagt kennis 
van de manier, waarop die 
op een schijf worden gezet. 


Computerkunst 13 
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Met de computer kunst be¬ 
drijven of de computer juist 
als onderwerp voor kunst 
gebruiken. 


Intuition: Amiga 15 

De ”user-interface” van de 
Amiga nader bekeken. 


Korter laden op 
cassette 16 


Software nieuws 20 

Weer veel programma’s be¬ 
keken en besproken. 


Vragenrubriek 


27 nieuwe toepassing, zoals 


Weer een aflevering vol met 
Bodzinga’s probleemkil- 
lers. 


Computer- 

meubelen 29 

Bij een computer hoort ook 
een opbergkast, we zijn nu 
wat verder dan de tijd, 
waarin de micro voor de TV 
stond. 


No Load Error 33 

Laadproblemen met de 
cassettes kunnen verhol¬ 
pen worden. 


Tekst in Hi-Res 55 

Bij leuke plaatjes ook nog 
teksten maken is niet zo 
eenvoudig, maar de trucs 
leert u hier. / 


MAC 64 57 

Uw C-64 een veelzijdig 
meetinstrument 


Bankswitching 58 

Dit is niet de overgang naar 
de postbank, maar een me¬ 
thode voor efficiënter ge- 
heugengebruik. 


Miniatuurtjes 60 

Korte programma’s, voor 
wie eigenlijk niet van pro¬ 
grammeren houdt, maar 
toch wel eens snel wat wil 
proberen. 


Interactive CD. 

Machinetaal 

deel 10 67 

Met Sjoerd Bakker verder 
op avontuur in de machine¬ 
kamer. 


Gebruikers¬ 
groepen 69 


Amiga Software 70 

Een erg creatief program¬ 
ma voor de nieuwe media- 
computer :DeLuxe Paint. 
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Flight Simulators 72 

Een overzicht van de be¬ 
schikbare vliegtrainers voor 
luchtvaart-enthousiasten in 
hun luie stoel. 

Basis Basic deel 4 78 

Jan Bodzinga geeft tekst en 
voorbeelden voor Basic 
toepassingen. 

Soft Wir War 84 

Onze strip met pit van Bert 
Tier. 


Listingrubriek 
PRINT-OUT 34 

De betere listings, 
natuurlijk met 
checksum- controle: 


Checksums 

34 

Drive Manager 

35 

ListWash 

36 

Listing 

37 

Duizenden 

38 

Soundmon 

39 

Pakspel 

44 

Hokken C-16 

66 

Wijzerplaat C-16 

50 

GhostrunnerC-16 

54 

PieptypC-16 

54 
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Control 

Home Interactive computer¬ 
systemen beginnen zo langza¬ 
merhand een waar modever¬ 
schijnsel te worden. Met be¬ 
hulp van een geschikt interface 
is het mogelijk om allerlei huis¬ 
houdelijke- of kantoorappara¬ 
tuur met de micro te besturen. 
Zo heeft de firma X-10 uit de VS 
het Power House Home Con- 


Een compatible PC van ODDATA 

vanaf ƒ 2.395,-* 






03480-12128 
Pottenbakkersweg 7 
3449 HZ Woerden 


Wat is wijsheid ? 


_. ODDATA Systems- 

_Automatisering & Electronica- 


Robcom Head 
Alignment-kit 

Een afwijking in de azimuth van 
de datarecorderkoppen kan 
tot lastige laadfouten leiden. 
Vooral als van een snellader of 
tapeturbo gebruik gemaakt 
wordt kan een minieme afwij¬ 
king van de koppenstand al 
roet in het dataeten gooien. 
Vele spelletjes en program¬ 
ma’s die ”niet werken” blijken 
bij het testen op een andere 
recorder het slachtoffer van dit 
euvel. 

Het Robcom afregelsysteem 
maakt gebruik van een specia¬ 
le afstemcassette. Op deze 
cassette staat een toon die u, 
door met behulp van het bijge¬ 
leverde schroevendraaiertje 
aan het stelschroefje van de 
recorderkoppen te draaien, 
kunt afstemmen. Het is de be¬ 
doeling dat u daarbij de hoogst 
mogelijke toon (pitch sound) 


scherm bewegen. 

Zodra de pen het grafische ta¬ 
bleau aanraakt verandert zij in 
een graphicspen. Daarmee 
kan de gebruiker tekenen en 
na/overtrekken. 

Penmuis werkt onder elke 
hoek en is zowel geschikt voor 
rechts- als linkshandig gebruik. 


03406-64042 
Meerndijk 57 
3454 HP De Meern 




IDC Benelux Report 

Dit marktonderzoeksbureau 
heeft nu ook een Nederland¬ 
stalige nieuwsbrief met erg 
veel marktionformatie over de 
computerbranche. Inl. 020- 
791692 


Smartcable 

De bekende Smartcable, om 
RS-232 communicatie-proble- 
men op te lossen, is nu in ver¬ 
beterde vorm beschikbaar via 
LCI (04139- 2981). 




* Model PC-50: 256k RAM/1 diskdrive 360k 
kleuren-Grafische kaart/Keyboard/RS 232/Centr. aansluiting. 
Tevens zijn wij leverancier van (bijbehorende) soft- en hard¬ 
ware. Oddata is tevens specialist op het gebied van kabels en 
netwerken (LAN). LAN Startpakket vanaf ƒ 2495,-! 


Samen met de HCC zoekt de 
ANWB als ondersteuning van 
het afvalproject "Laat niet als 
dank..” een computerspel. Met 
een hoofdprijs van ƒ500,- 
moet het zwerfvuilprobleem 
daarvan het onderwerp zijn. In¬ 
dienen voor 2 mei bij PB 2249, 
3500 GE Utrecht. Inl. 030- 


946645 


trol, een veelzijdig C64(128)- 
interface voor de besturing van 
electrische apparatuur. Vol¬ 
gens de fabrikant kan de ge¬ 
bruiker diens huis met een ge¬ 
rust hart achterlaten, want Ho¬ 
me Control neemt alle electri¬ 
sche zaken waar. Alleen voor 
de kat moet u zelf een oplos¬ 
sing bedenken daar dit huis¬ 
dier zich nu eenmaal moeilijk 
laat uitschakelen. 

Het interface kan maximaal 
256 modules besturen. Werkt 
zowel bij 220- als 110V en be¬ 
schikt over een eigen nood- 
batterij voeding. Programme¬ 
ren is door middel van de com- 
putersschermen heel gemak¬ 
kelijk. Via het toetsenbord of 
de joystick kan je apparatuur in 
de verschillende vertrekken si¬ 
tueren en dan daaraan bestu- 
ringsopdrachten verbinden. 
Onder in beeld verschijnen 
steeds alle benodigde pro- 
grammainstructies. 


Penmuis voor de 
Amiga 

Een pen die als een muis werkt 
of een muis die op een pen 
lijkt? Penmouse, van Kurta 
Corp, is een lichtgewicht, 
draadloos, van twee be¬ 
dieningsknoppen voorziene 
combinatie van een muis en 
grafisch palet. 

De Penmouse is zowel als een 
conventionele muis als een 
graphics-pen bruikbaar. Dit 
geeft de gebruiker een hoge 
mate aan bewegingsvrijheid. 
Zonder het tablet aan te raken, 
werkt de door batterijen ge¬ 
voede pen als een echte muis. 
Penmouse kan dan bijvoor¬ 
beeld een menukeuze active¬ 
ren of de cursor over het 
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instelt als de recorder het 
bandje afspeelt. 

De aldus afgeregelde Koppen 
kunnen nu elk commercieel 
turboprogramma perfect uitle¬ 
zen. Bij oude, dat wil zeggen in 
de afwijkende koppenstand 
opgenomen, software kan de 
nieuwe koppenstand echter 
voor datalaadproblemen zor¬ 
gen. Het beste kunt u deze 
software in de oude stand la¬ 
den en in de nieuwe azimuth 
heropnemen! 

Behalve de afstemcassette be¬ 
vat de Robcomkit ook nog een 
speciale reinigingscassette. 
Deze dient u voor het afstellen 
even te laten lopen om misver¬ 
standen met vervuilde koppen 
te voorkomen. Alleen schone 
koppen kunnen perfect afgere¬ 
geld worden! 

In de uitvoerige Nederlandse 
gebruiksaanwijzing staat alles 
over het instellen van universe¬ 
le-, MSX-, ATARI- en Schneider 
datarecorders. 


Intelligent toetsen- 
bordje voor de C-64 

Nieuw voor de C-64 is een los 
intelligent toetsenbordje met 
22 vrij programmeerbare druk- 
toetsen. De TA3 wordt aan de 
systeemkaart van de C-64 aan¬ 
gesloten op de insteekplaats 



van het standaard toetsen¬ 
bord. Hiervoor wordt een tus- 
senstekker meegeleverd. Het 
toetsenbord kan maximaal 50- 
tekens opslaan. Dmv. een ac¬ 
cu blijft de vastgelegde infor¬ 
matie behouden. De daarvoor 
benodigde laad- en ook de be- 
drijfsstroom worden aan de C- 


| 64 onttrokken. (NB. Verbruik c. 
a. 100 mA). De toetsen zelf 
bestaan uit twee delen: de ei¬ 
genlijke druktoets en een tran¬ 
sparant tekenkapje om de 
toets te identificieren. Een 
complete set letters en Com- 
modore-tekens wordt bijgele¬ 
verd. 

De prijs bedraagt DM 79, - bij 
de firma Maurer, Haingraben 
23, 6309 Munzenberg BRD. 

EPROM-pro- 
grammer-bouwkit 

De firma Rainer Bohm, Post- 
fach 2109, 4850 Minden in 
W.DId. biedt een EPROM-pro- 
grammer bouwpakket voor 
DM 333, -. Het apparaat kan 
standaard de EPROM-typen 
2716, 2732, 2764, 27128 en 
27256 met een spanning van 
21 of 25 Volt programmeren. 
Via de RS232-uitgang is vrijwel 
elke hobbycomputer aansluit- 
baar. . De programmeertijden 


zijn zeer kort. Het programme¬ 
ren van een 2764 EPROM kost 
nu nog maar 30 seconden i. p. 
v. de doors 

ROBTEK Cl28 Mo- 
nitorkabel 

Het aansluiten van een Cl 28 
op een monitor geeft bij een 
aantal niet speciaal voorberei¬ 
de monitoren problemen. Rob- 
tek Ltd Londen biedt daarvoor 
een goede oplossing in de 
vorm van het Magie Monitor 
Interface. 

Het interface zelf is in de 9- 
polige RGB-videoplug ge¬ 
bouwd en beschikt over een 
tuimelschakelaar voor 40- (in 
de op-positie) en 80-koloms (in 
de neer-positie) display. Uit het 
interface komen twee kabelt¬ 
jes. Eentje leidt naar de zwarte 
5-polige 40 koloms videoDin- 
plug en van daar naar de moni- 
tortulpplug van de videoutput. 
De andere naar de rode audio- 


CAFKA COMPUTERS 


Commodore 

64 

ƒ 599,- 

Modems 

Tel © tron 1200 

549,- 


128 

875,- 


Protek acoustisch 

98,- 


128-D 

1749,- 


300 en 1200 Band 



Amiga 

6250,- 


Miracle WS-2000 

598,- 


PC-10 

3750,- 


Nightingale 

398,- 



ex. BTW 

Diversen 

Data quick drive 

125,- 

Disc drives 

1570 

699,- 


Game killer 

69,- 


1571 

999,- 


Power cartridge 

139,- 





RS-232 interface 

99,- 

Monitoren 

602 groen 

349,- 


draadloze joysticks/set 

85,- 


1702 kleur 

1902 kleur 

799,- 
1299,- 

Software 

Superbase 64 

299,- 





Superscript 64 

299,- 

Printers 

Brother HR-5C 

299,- 


Vizawrite 

299,- 


Smith Corona Faxtext-80 

449,- 


Superbase 128 

499,- 


Citizen 120D 

798,- 


Superscript 128 

449,- 


Star SG-10C 

948,- 


Textomat plus 

249,- 


Brother M-1509 

1599,- 


Austrocamp basic 



Epson FX-85 

1998,- 


campiler 

299,- 


Postorders 020 - 226440. Bestellen ook per giro 3238226, Cafka Computers, Amsterdam of ABN 54.87.14.266 t.n.v. Cafka 
. Computers Amsterdam. Bestellingen beneden ƒ100,- met ƒ10,- kosten, boven ƒ 100,-franco. 


CAFKA AMSTERDAM 

CAFKA HAARLEM 

Nieuwe Kerkstraat 67 (hoek Weesperstraat) 

Oude Groenmarkt 24 

020-273598 

023-312769 

Grootverbruik 020 - 275799 Telex 13233 
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outplug. 

Het in bedrijf stellen gaat als- 
volgt: 

m- 80-kolomsdisplay: 1. Druk 
de 40/80-kolomstoets op het 
Cl 28 keyboard in. 

2. Zet de interfaceschakelaar 
naar beneden. 

3. Druk de C128-RESET in. 
nr 40-kolomsdisplay: 

1. Zet de 40/80kolomstoets op 
de stand normaal. D.w.z. niet 
ingedrukt! 

2. Zet de interfaceschakelaar 
naar boven. 

3. Druk de RESET-toets in. 
Deze interfacekabel vormt een 
welkom accessoire voor de 
Cl 28- bezitter/koper die al 
over een andere monitor be¬ 
schikt. 

Golfsimulatie 

Computersimulaties van spor¬ 
ten (o. a. zeilen) en spelen 
(Bridge en Schaken) worden 
steeds populairder. Nu moet 
ook het golfen in de zeer realis- 



tiese simulatie Nick Faldo 
plays the Open er aan geloven. 
Een prominente Britse golfspe¬ 
ler geeft les over 18 "Holes” op 
een echte wereldkampioen- 
schappen-baan. Met zaken als 
slagrichting en -kracht, en win¬ 
drichting en sterkte wordt ter 
dege rekening gehouden. De 
actie is net als het echte spel 
rustig, maar biedt fraaie grap- 
hics. C.a. ƒ 150, - voor de C-64. 

Monitor-TV-Tuner 

Velen van ons zullen het be¬ 
treuren dat hun prachtige kleu- 
renmonitor(en) geen normale 
tv-signalen kan verwerken. 
Mbv een speciale Monitor-TV- 


Tuner kan echter een groot 
aantal monitoren PAL-compa- 
tibel gemaakt worden. Bijvoor¬ 
beeld Commodore 1701,1702, 
Philips, Sony, Sharp en Sanyo- 
monitoren zijn via de nieuwe 
High Screen Monitor-TV-Tuner 
op de kabel aansluitbaar. In 
Duitsland inmiddels voor DM 
249, - verkrijgbaar bij de firma 
VOBIS, Postfach 1778, Viktori- 
astrasse 74, 5100 AACHEN. 

CAD 64 

Van Orpheus is er het CAD 64 
ontwerpprogramma voor het 
maken en animeren van driedi¬ 
mensionale figuren. Zowel 
educatief als voor het amken 
van ontwerpen. In de 2-D mo¬ 
de kan dit pakket ook alle nor¬ 
male grafische handelingen 
aan. ƒ69,- cassette. 

Print Shop Graphics 
Library II 

Broderbund heeft opnieuw een 
aanvulling voor haar befaamde 


Print Shop software uitge¬ 
bracht. Deze tweede Library 
disk bevat plaatjes in de cate- 
goriën: Banen, hobbies, plaat¬ 
sen, reizen en gezondheid. De 
Print Shop Graphics Library, 
Disk Two kost ongeveer ƒ 75,- 
en we verwachten, dat Aacko- 
soft er binnenkort mee komt. 

Chemie op de 64 

Computersimulatie en -onder¬ 
wijs leent zich uitstekend voor 
het chemieonderrricht. Stoeien 
met atomen, ionen, verbindin¬ 
gen, ruimtelijke structuren, re¬ 
acties en het Periodieke Sy¬ 
steem der elementen is al ge¬ 
ruime tijd gemeen goed op de 
universiteiten. Ook voor de HC 
komen steeds meer chemie- 
programma’s beschikbaar. 
Onlangs kwamen twee nieuwe 
duitse software pakketten op 
de markt: CLB Software voor 
Chemie en Laboratorium biedt 
voor de C-64 en software en 
meethardware (PH-bepaling 


Sala Communications 

zoekt voor haar toenemende reeks 
INFO-bladen een: 
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Advertentie-acquisiteur 
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Om vanuit het kantoor te Amsterdam 
adverteerders voor Telecom-lnfo, PC 
Business Info en Home Bus Info te bena¬ 
deren. Ervaring met (telefonische) acqui¬ 
sitie gewenst, talenkennis strekt tot aan¬ 
beveling. Leeftijd tot 40 jaar, flexibele 
opstelling en meedenken zijn echter het 
voornaamste. 


Sollicitaties te richten aan: 
Sala Communications 
t.a.v. L. Sala 
PB 112 

1260 AC Blaricum. 



- TASWORD = TEKSTVERWERKEN - 

Tasword is een begrip voor iedereen die serieus met tekstverwerking bezig is. Ge¬ 
bruikers van Spectrum, Schneider, MSX, (en als het aan ons ligt, binnenkort ook 
Commodore 64) zweren er bij. Het programma vindt aansluiting bij zowel de begin¬ 
ner als de echte beroepsmatige gebruiker, die andere programma's gewogen en te 
licht bevonden heeft. Gek genoeg is het succes van het programma niet te danken 
aan dure advertentiecampagnes. Een relatief klein softwarehuis in Engeland (Tasman 
Software) investeerde veel tijd in het ontwikkelen van een professionele tekstver¬ 
werker, die ook voor de beginnende huiscomputeraar geen problemen zou kunnen 
opleveren. Filosoft is er trots op een Nederlandse vertaling van Tasword te mogen 
uitbrengen, die de volledige goedkeuring van Tasman Software geniet. Om eerlijk te 
zijn hebben we nog wel wat meer van onze Engelse vrienden afgekeken: een uitge¬ 
breide telefonische hulp- en adviesdienst, en het - soms tegen beter weten in - hand¬ 
haven van een lage prijs voor het produkt. Voor sommige van onze (commerciële) 
concurrenten is deze aanpak een doorn in het oog. Het zij zo. Ons advies is: oordeel 
zelf, raadpleeg uw dealer, maar ook uw collega-hobbyist: tien tegen een dat uw keu¬ 
ze op Tasword valt. 

- COMMODORE 64 - 

TASWORD 64. Ja, het is gelukt: tekstverwerken kan nu ook op de C'64 met 80 
kolommen op het beeldscherm (en op de printer) ZONDER EXTRA HARDWARE. En 
het resultaat mag er zijn! U kunt nu uw oude 'typeprogramma' aan de kant zetten, en 
echt professionneel aan het tekstverwerken slaan. (Filosoft geeft nog f5,— korting 
bij inruil van ieder ORIGINEEL exemplaar van elk ander merk). Het programma TAS¬ 
WORD 64 wordt geleverd in een 100% Nederlandstalige versie, met een voorbeeld¬ 
tekst, een duidelijke handleiding en het Filosoft service-kontrakt. 

Prijs (niet schrikken)... disk f99,— cass. f89,— 

COMQUER. RISKeer uw nachtrust met deze knappe computersimulatie van het be¬ 
kende spel, waarin uw legers de wereldkaart moeten zien te veroveren. Voor 1 tot 5 
spelers. De computer speelt, indien gewenst, mee als een meesterschaker. 

Pas op: geen spelletje, maar een verslaving. disk f 69, — cass. f 59,— 

SPELLINGSBAK 1 & 2. De complete Nederlandse spelling als een educatief pro¬ 
gramma in twee delen. Voor scholen vanaf klas 5 van het L.O., maar ook in de huis¬ 
kamer (waar ook academici blijken te kunnen struikelen). Wat dacht u trouwens van 
een bijspijkercursus? Per deel: disk f 69,— cass. f 59,— 

- INFORMATIE - 

Meer informatie over onze programma's staat in onze gratis folder. Vraag 'm aan 
(vermeldt wel het merk van uw computer) d.m.v. een briefkaartje naar: Postbus 
1353, 9701 BJ Groningen, of telefonisch: 050-1 37746. Filosoft produkten zijn te 
koop in de goede computerzaak, maar ook rechtstreeks te bestellen: door storting 
van het bedrag + f 3,50 verz.k. op giro 20792 t.n.v. Filosoft, Groningen. 
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e.d.) aan. De prijzen liggen tus¬ 
sen de 25 en 55 mark. Info bij: 
CLB-Marketting, Umschau- 
Verlag, Stuttgartstrasse 19-24, 
6000 Frankfurt 1. Het program¬ 
ma ATOMI(C-64) van CHIP 
SOFT laat u kennis maken met 
de chemiese tekens, atomen 
en ionen, het periodieksysteem 
en de verschillende chemiese 
verbindingen. Voor DM 39, 95 
bij CHIP-SOFT-Service, Abt. 
735, Vogelverlag, Postfach 
4760, D-8700 Wurzburg 1. 

128: De half miljoen 
gepasseerd 

In de hele wereld blijkt de 128 
het heel aardig te doen, er zijn 
er in de eerste zes maanden al 
meer dan een half miljoen van 
verkocht, waarvan in Europa 
ongeveer 150.000. In absolute 
aantallen een record, ook ver¬ 
geleken met de eerste zes 
maanden van bijvoorbeeld de 
64 en de Vic 20. Maar daarbij 
moeten we natuurlijk wel be¬ 
denken, dat die machines des¬ 



tijds in een vrijwel maagdelijke 
markt uitkwamen. De verko¬ 
pen van de 128 nu maken deel 
uit van de vele miljoenen mi¬ 


cro’s, die per jaar over de toon¬ 
bank gaan. 

Marktverzadiging 
Er zijn natuurlijk wel hier en 
daar berichten over marktver¬ 
zadiging op de micromarkt. In 
de meeste westerse landen zit 
men op zo’n 6 tot 10 % (in de 
US). In Duitsland is het 7,2%, in 
ons land lopen we met onge¬ 
veer 8,5% zeker niet achter. 

Bladerunner 

Er bestaat af en toe wat ver¬ 
warring tussen de spelen Lo- 
de- en Bladerunner. Bladerun¬ 
ner is gebaseerd op de 
gelijknamige Science Fiction 
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film waarin Harrison Ford, als 
premiejager, de medogenloze 
jacht op renegate androiden, 
onder leiding van Rutger Hauer 
opent. Dit alles tegen de on¬ 
heilspellende achtergrond 
van het smerige, mistige, over¬ 
bevolkte Los Angeles in 2019 
en muziekaal omlijst door Van- 
gelis. 

Het spel Bladerunner zal voor 


Handykap stofkap met korting 
voor nieuwe abonnees 

Voor lezers van Commodore-lnfo, die zich nü voor het eerst 
gaan abonneren, heeft het bekende stofkappenbedrijf Handy¬ 
kap een speciale aanbieding: U kunt een stofkap voor uw C-16 
of C-64 kopen met een korting van maar liefst ƒ 10,-1 Voor 
ƒ 25,- krijgt U de gewenste stofkap onder rembours in huis 
(normale prijs ƒ 35,-). Er zijn geen extra verzend- of rembours- 
kosten. Het enige wat U hoeft te doen is het betreffende hokje 
aankruisen op de abonneerbon op pagina 41 en het gewenste 
type aangeven. De stofkap wordt U dan zo spoedig mogelijk 
toegestuurd. 


Ik daag u uit...! 


Ik daag u uit zelf te ontdekken wat u met een cursus 
kunt bereiken. Het NTI heeft leerzame, boeiende 
cursussen die u helemaal vertrouwd maken met 
de Commodore-64. Als u de onderstaande bon 

invult en opstuurt, brengt de 
postbode u binnenkort alle 

inlichtingen. 
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BASIC voor de 
Commodore-64 

Een volledige, voor iedereen 
begrijpelijke leergang die u 
volledig vertrouwd maakt met 
dehomecomputer,de randap¬ 
paratuur en de programma's. 
U leert speciale programma's 
maken. En ook het testen er¬ 
van, het zoeken van fouten, 
het opslaan en beheren van 
gegevens, enz. En uiteraard 
leert u BASIC, de speciale we¬ 
reldtaal voor homecomputers. 

GRATIS 

bij de cursus: 

hardware t.w.v. f 250,- 

Alle bijzonderheden vindt u bij 
de kennismakings-les. 


Machinetaal 
voor de 

Commodore-64 

Een cursus voor wie al in BA¬ 
SIC met de Commodore-64 
kan omgaan en wil doordrin¬ 
gen tot het geheimzinnige 
"hart" van de homecompu¬ 
ter. Een leergang dus voor de 
echte computer-'Tijnproe- 
ver", die alles over zijn hobby 
wil weten. 


GRATIS 

bij de cursus: 
Assembler-cartridge 
t.w.v. f 89,- 

Alle bijzonderheden vindt u bij 
de kennismakings-les. 


De Homecomputer-PLUS-opleiding 

Voor wie zowel BASIC als Machinetaal wil leren, is er de speciale 
Homecomputer-PLUS-opleiding. Een combinatie van de beide ande¬ 
re cursussen, echter tegen verminderd lesgeld. Maar wel met GRATIS 
hardware t.w.v. f 250,- en bovendien de GRATIS Assembler-cartrid¬ 
ge t.w.v. f 89,-. Alle bijzonderheden vindt u bij uw kennismakings¬ 
les. 

GRATIS EN VRIJBLIJVEND 

Stuur de onderstaande Bon zonder postzegel naar het NTI. Dan ontvangt 

u snei alle informatie per post thuis. 

IMEDERLAN DS TALEN INSTITUUT Schriftelijkprivé-les thuis 
Rechtzaad 2-4703 RC Roosendaal Telefoon 01650-60.120 




Gratis Kennismakings-Bon 


Aan het Nederlands Talen Instituut l Stü ^ 


NT l-AnZl 0 ^ 


'mie 
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JA, stuur mij gratis en vrijblijvend 
het uitvoerige kennismakings-pakket van de cursus 
die ik hieronderzó (El aankruis: 

□ BASIC voor de Commodore-64 

□ Machinetaal voor de Commodore-64 

□ De Homecomputer-PLUS-opleiding (BASIC met Machinetaal) 

Ik heb geen enkele verplichting. Ik mag het pakket houden. Geen bezoek aan huis. 

□ Dhr. DMevr. DMej. (Zó (Ei aankruisen a.u.b.) Eén blokletter per streepje. 


Naam: I I I I I 1 I I I I 1 I I I _I_I_I_I_I Voorletter:!_I 

Straat: I_L_J_I_I_I_I_I_I_I_I_I_I_I—I—I—I—I—I Nr.:l—l—l—l—I 

Postcode: I I I I I l__J_I Plaats: I_I_1—I—I—L_J—I—I—I—I—I 

Het pakket is gratis voor iedereen van 16 jaar of ouder. 
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menige filmfan een zware te¬ 
leurstelling blijken. Alleen de 
goede muziek is gebleven. 
Middelmatige graphics en het 
zwakke spelgegeven, achter¬ 
volg de replidroids en knal ze 
neer zonder de onhandige om¬ 
standers te raken, halen bij lan¬ 
ge na de kwaliteit van de origi¬ 
nele film niet. 

Commodore AT : 

Mee met de 
technologie 

Traditioneel gebruikt Commo¬ 
dore de jaarlijkse Hannover 
Messe om nieuwe produkten 
aan te kondigen. Vooraf had 
men al de Amiga officieel in 
Europa geïntroduceerd, maar 
op de Cebit/Hannover Messe 
bleek men toch nog iets meer 
in huis te hebben, namelijk een 
nieuwe AT compatibele PC. 

In ons vorige nummer lieten we 


al een plaatje van de IBM AT 
zien met de opmerking, dat we 
nu snel ook van Commodore 
een krachtiger PC verwacht¬ 
ten. En die is er dus ook geko¬ 
men en dan natuurlijk tradi¬ 
tiegetrouw tegen een onge¬ 
kend lage prijs en in een com¬ 
plete uitvoering. Commodore 
is bezig zich goed op de PC 
markt te nestelen en beseft, dat 
men naast het "eigen” Amiga 
produkt op het IBM compati¬ 
bele PC terrein de beste kan¬ 
sen heeft voor een stabiele 
af zet. 

De afzet van de PC 10/20 is in 
ons land zeer behoorlijk op 
gang gekomen, we schatten, 
dat er zo’n 6 a 7.000 staan en 
dat betekent ongeveer een 
marktaandeel van 18 tot 20%. 
Niet slecht voor een betrekke¬ 
lijke laatkomer en men heeft nu 
dus ook voor de PC doorgroei- 
ers een aantrekkelijk aanbod in 
huis. Met de AT levert Commo¬ 
dore een snellere machine met 


20 MB harde schijf, die toch vrij 
compatibel is met de PC en 
b.v. ook netwerken van meer¬ 
dere PC’s toelaat. 

80286 AT 

De AT is eigenlijk een PC met 
een krachtiger processor, na¬ 
melijk de Intel 80286, die niet 
alleen wat sneller loopt door 
een hogere kloksnelheid, maar 
vooral door de echte 16 bit 
architectuur veel meer aankan. 
Meer geheugen, meer opslag 
en de AT is dan ook zo rond de 
3 x sneller als de gewone PC. 
Voor wie veel met grote be¬ 
standen werkt, ingewikkelde 
bewerkingen uitvoert en met 
de coprocessor 8087 van de 
normale PC niet uitkomt, is de 
overstap dus erg gemakkelijk. 
Want de PC schijfjes passen 


bijvoorbeeld in de AT en wan¬ 
neer de AT onder DOS 2.1 
werkt, kan men ook de meeste 
software wel gebruiken. Er kan 
ook onder DOS 3.0 gedraaid 
worden, en dan kan men aan 
netwerking denken en de 1,2 
MB capaciteit van de floppy 
drive gaan benutten. 
Commodore heeft nu dus ook 
een AT kloon en traditiege¬ 
trouw zet men die zeer concur¬ 
rerend in de markt. In Duitsland 
noemde men een prijs onder 
10.000 mark voor de basisma¬ 
chine en dat is tussen de 4 en 
6.000 mark goedkoper dan de 
IBM broer. Daarbij komt nog, 
dat de AT van Commodore nog 
wat completer is uitgerust dan 
de IBM. We verwachten de 
Commodore AT binnen enkele 
maanden in ons land. • 


Sala Communications 

zoekt voor haar toenemende reeks 
INFO-bladen: 


Het gaat om computer-enthousiasten, 
die kunnen helpen de grote stroom inge¬ 
zonden listings, programma’s en ander 
materiaal te beoordelen en eventueel 
voor publikatie geschikt te maken. Het 
gaat met name om mensen, die thuis zijn 
op de Joyce, de Atari ST, de Amiga, de 
MS-DOS PC’s en de MSX. Liefst woon¬ 
achtig in het Gooi. 


Sollicitaties te richten aan: 
Sala Communications 
t.a.v. L. Sala 
PB 112 

1260 AC Blaricum. 




COURBOIS SOFTWARE tel. 08897-2546 

Wij kunnen u de goedkoopste software van Nederland leveren, al vanaf 10 gulden per 
cassette voor de Commodore VIC-20, 64,16 en Plus 4, de Atari computers, Spectrum 
en MSX. Allerlei randartikelen zoals diskettes, stofkappen, kabels, eproms enz. enz. 
Speciaal nu: DTE + Kernal, 16 maal sneller iaden met 64 en 1541 voor slechts 110 
gulden. 

Bel op en vraag onze GRATIS catalogus. 


Fazantlaan 61-63, 6641 XW Beuningen. 
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Wanneer u echt effectief wilt werken met een PC 


datavisie 


software & informatie - services 


Voor 
aan: 

PC-10 in standaarduitvoering, inclusief Monit 
LOTUS 1-2-3 (la) voor de complete prijs van - 




Na de computerrage heeft de publiciteit nu 
een nieuw high-tech brandpunt gevonden. 
De COMPACT DISC gaat het helemaal 
maken, voor audio kan het al niet meer 
stuk, maar verdere mogelijkheden komen 
er aan. Koppeling aan andere systemen, 
zoals de computer, maken dit opslagmedi¬ 
um nu veelzijdiger, naast audio kunnen er 
nu ook plaatjes, video en zelfs computer¬ 
software op gezet worden. We gaan nog 
wat beleven met die CD-technologie. Met 
CD-ROM en CD-Interactive (CD-I) wordt 
nu de consument weer het hoofd op hol en 
de publiciteitsmolen op gang gebracht. 
Prima zaak dus, en het helpt natuurlijk 
mee, dat nationale trots Philips erachter 
staat Leve de CD, weg met de computer!? 
Ho, ho, ik denk dat we pas echt iets gaan 
merken van de nieuwe CD toepassingen, 
als de computertechniek, het omgaan met 
gegevens, met zoekstructuren, met soft¬ 
ware in de breedste zin C’content”), ge¬ 
meengoed zijn geworden. Wie denkt zon¬ 
der toetsenbord de CD-I zin vol te kunnen 
gebruiken, zal nog wat beleven. Zelfs als 
we gebruiksvriendelijkheid en logische da¬ 
tastructuur als uitgangspunt nemen, kun¬ 
nen we de multidimensionale data-inhoud 
van een CD-ROM, vergeleken met bijvoor¬ 
beeld een boek, enorm. Want interactieve 
keuze uit geluid, muziek, spraak, tekst, 


beeldjes, animaties en computerprogram¬ 
ma’s kan gauw een media-overstroming 
veroorzaken bij de ontvanger. Het klinkt 
allemaal 'zo mooi, deze nieuwe trend in 
”electronic publishing”, de beheersing 
van bergen informatie en het daaruit zeven 
van datgene, wat de individuele gebruiker 
nodig heeft. Het is ook mooi en natuurlijk is 
zo’n CD-plaatje makkelijker dan de tiental¬ 
len boekwerken, die er qua inhoud op 
kunnen. 

Toen ik echter eens een paar uur door de 
eerste CD-ROM encyclopedia (van Micro¬ 
soft) had gewandeld, voelde ik me bepaald 
niet méér verrijkt (in geestelijk opzicht), dan 
na het lezen van een papieren versie. Mas¬ 
sale gegevens-toediening, daar moet een 
mens namelijk maar tegen (willen) kunnen. 
Wat koop je voor meer gegevens, als die 
eigenlijk nauwelijk (zinvolle) informatie be¬ 
vatten. Enorme bergen data zijn toch meer 
het terrein van de computer, die kan name¬ 
lijk niet creatief werken met wat ie niet 
weet (heeft). De menselijke geest werkt 
graag met fragmentarische informatie, ge¬ 
zeefd en aangevuld, soms op heel eigen 
wijze. 

De nieuwe technieken bieden natuurlijk 
grote mogelijkheden, maar vereisen eigen¬ 
lijk ook nog steeds aanpassing van de 
mens aan de machine. De gebruiker dient 


de logica van de machien te volgen en hoe 
meer ”ruwe” gegevens er aanwezig zijn in 
het geheugen, op de CD, beeldplaat of 
databank, hoe strikter hij de opbouw van 
die gegevensopbouw moet begrijpen en 
volgen. En de beste manier om die "com¬ 
puterlogica” te leren is dus het gebruiken 
van een hobbycomputer! 

Niet alleen door in Basic of een andere taal 
te gaan programmeren, maar vooral door 
toepassingen. Afvragen van databanken, 
het maken van teksten, gebruiken voor 
analyses, het zijn toch het soort toepassin¬ 
gen, waardoor men leert met grotere be¬ 
standen om te gaan. Een gebied als ”desk¬ 
top publishing”, waarbij niet alleen de 
tekst, maar ook de vormgeving, gebruik 
van ”clip-art”, verschillende lettergroottes 
en layout meespelen, is ook zo’n aanloop 
tot gestructureerd gegevensgebruik. Want 
de tekst is daarbij maar een van de onder¬ 
delen, het oog wil ook wat en wie weet 
komt de combinatie spraak-tekst ook nog 
wel eens om de hoek kijken. 

Daarom is die computer nog lang niet 
uitgerangeerd en moeten we juist blijven 
zoeken naar zinvolle toepasingen, ook in 
het onderwijs. 

Waarom praat er nog niemand over 
”schoolbank publishing”? 

Ir. L.Sala 
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Datavisie 


Forel 40, 1261 PK Blaricum 

® 02152-51537 

Inschr. KvK H’sum 36273 
































Behalve voor programma-opslag kan een floppy disk ook gebruikt worden voor 
gegevensopslag, b.v. adressenbestand, voorraden, postzegelverzamelingen enz. 
Daarbij kan gebruik gemaakt worden van twee verschillende soorten bestanden. Dit 
zijn sequentiële en relatieve bestanden. Ze hebben elk hun voor en nadelen en de 
toepassing bepaalt welke het handigst fs. Weer een bijdrage van Courbois. 

1541 -Bestandsbeheer: 
Sequentieel of relatief? 


B estanden zijn verzamelingen ge¬ 
gevens, die meestal op een of 
andere manier georganiseerd 
zijn. We kennen tekstbestanden 
(met ASCII of programma-speci- 
fieke codering) en databestanden. Dat 
laatste wil zeggen, dat de gegevens 
gelijksoortig zijn en we die per soort 
willen manipuleren, dus bijvoorbeeld 
sorteren, rangschikken etc. Dergelijke 
bestanden kunnen we op twee verschil¬ 
lende manieren opzetten, namelijk als 
sequentiële (desgewenst sekwentiële) 
of seriële bestanden en als relatieve 
bestanden. 

Sequentiële bestanden 

Dit is de eenvoudigste manier om gege¬ 
vens op te bergen. Een bestand wordt 
achter elkaar op disk weggeschreven en 
weer ingelezen, het is dus een hele reeks 
codes of tekens achter elkaar. Laten we 
eens kijken hoe je daar bij een eenvoudige 
toepassing als een adressenbestand en 
met gebruik van de 1541 mee om kunt 
gaan. Wil je in een adressenbestand de 
adressen bekijken dan moetje ze eerst wel 
inlezen, voordat je iets kunt doen. Nemen 
we even aan dat het om 10 adressen gaat. 
In Basic ziet dat openen er dan zo uit: 
100 OPEN 1, 8, 8, ”0:filenaam, s, w” 

105 FOR I = 1 TO 10 
110 PRINT # 1 ,A$ 

115 NEXT 
120 CLOSE 1 

In regel 100 open je een databestand 
onder je "filenaam” op je drive 0. De ,s 
geeft aan dat het een sequentieel bestand 
is en de ,w wat je wilt schrijven (write). 
Met behulp van het PRINT -kommando 
kun je nu een of meerdere strings of getal¬ 
len op disk wegschrijven of bewaren. Aan 
het eind sluit je af met CLOSE. Je ziet dat in 
PRINT en CLOSE het cijfer 1 voorkomt. 
Dat is het eerste cijfer dat bij OPEN staat. 
Dit moet, de computer herkent hieraan 
naar welk bestand de PRINT moet, en welk 


bestand dan gesloten moet worden. Op¬ 
halen van de gegevens gaat bijna op de¬ 
zelfde manier. De wijzigingen zijn als volgt: 
Op regel 100 moet de w vervangen worden 
door de r (read). Op regel 110 de PRINT 
door INPUT. Het programma wordt dan : 
100 OPEN 1, 8, 8, ”0:filenaam, s, r” 

105 FOR 1 = 1 TO 10 
110 INPUT #1,A$ 

115 NEXT 120 CLOSE 1 

Voordelen van dit soort sequentiële be¬ 
standen zijn: 

C> Erg eenvoudig in programma’s in te 
voegen. In wezen kan dit soort bestan¬ 
den ook op een tape. 

0 Getallen en strings mogen door elkaar 
staan. 

t> Alles staat in de door de programmeur 
gewenste volgorde. 

Nadelen: 

0 Als je een gegeven wilt veranderen moet 
je eerst het hele bestand in geheugen 
laden en het daarna weer helemaal weg¬ 
schrijven. 

C> Alles staat in vaste volgorde. Je kunt 
niet eerst het laatste lezen. 

Relatieve bestanden. 

De tegenhanger van het sequentiële be¬ 
stand. Hier ligt de plaats van ieder item in 
het bestand vast via een soort adres, een 
plaatsaanduiding. Alles wat sequentieel 
kan, kan nu ook. Maar in dit soort bestand 
kan je ook nog eens tegelijk lezen en 
schrijven. Wil je adres 355 veranderen, dan 
lees je adres 355 in de computer, verander 
het en schrijf alleen dat adres terug naar 
disk. Je bent dan dus slechts op één plaats 
in het bestand (en daarmee op de schijf) 
bezig, de rest blijft onaangetast. 

Ook kunen we wel een paar nadelen noe¬ 
men. Doordat de disk (controller en dus de 
computer) precies moet weten waar alles 
staat, moet alles een vaste lengte hebben. 
Je kunt niet eerst "PIET” en daarna ”JAN- 
WILLEM” als filenaam of veldnaam (be¬ 



standen zijn opgebouwd uit records en 
velden) gebruiken als dat wat je wilt weg¬ 
schrijven. 

Laten we eens kijken naar de manier van 
openen van zo’n bestand. Dit is voor lezen 
en schrijven gelijk, het mag ook tegelijk 
gedaan worden. 

100. OPEN 1,8,8,”0:filenaam, L,” + 
CHR$(xx). 

De letter ”L” geeft hier aan dat het relatief 
bestand is. De CHR$(xx) geeft de lengte 
van 1 item in het bestand aan. 
xx=lengte+1. 

Wil je dus strings van 50 tekens opslaan 
dan wordt xx gelijk aan 51 en regel 100 
wordt: 

100 OPEN „ 1,8,8,”0:filenaam, L,” + 
CHR$(51). 

Denk eraan, dat als je met INPUT het 
gegeven wilt lezen, de lengte xx niet groter 
mag zijn dan 80. Wil je toch langere strings 
gebruiken dan moet ie die met het GET- 
kommando letter voor letter binnenhalen 
in de computer. Het getal xx moet tussen 1 
en 254 liggen, groter dan 253 tekens mag 
je tekst-string dus niet zijn. 

Bij het aanmaken van een relatief bestand 
kan dit het beste ”op maximaal 1000 
adressen wilt opslaan, je het bestand al- 
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vast 1000 velden geeft. Dit bespaart later 
veel tijd. Het is geen uiterste grens, wil je 
later het 1100e adres invoeren dan maakt 
de disk het bestand wel langer. Het duurt 
dan wel even. 

Nu laten we een bestand aanmaken met 
strings van 50 lang en we zetten 1000 van 
die strings (met bv. naam, adres, plaats) in 
het bestand. 

We moeten dan de disk kunnen vertellen 
dat we gegeven 1000 willen schrijven. We 
doen dat met een hulp-kanaal van de 
diskdrive. 

PRINT #15,”P” + CHR$(K)-f CHR$(L) + 
CHR$(H)+ CHR$(B) 

Hierbij is ”K” het getal dat we bij het OPËN- 
kommando gebruikt hebben als 3e getal. 
In onze voorbeelden 8. De kodes ”L” en 
"H" geven het gegevensnummer aan. Dat 
wordt als volgt uitgerekend voor het getal 
1000 : 

H=INT(1000/256) 

L=1000-h*256 

Tenslotte ”B” geeft aan, bij welke letter je 
moet beginnen te lezen. B=5 wil zeggen : 
begin bij de 5e letter van deze string te 
lezen. 

Het programma: 

100 OPEN 15, 8, 15 

110 OPEN 1,8, 8, ”0:FILE, L,"+CHR$(51) 
120 H = INT(1000/256) 

130 L=1000-H*256 

140 PRINT # 15,”P”4- CHR$(8) + 

CHR$(L)+ CHR$(H)+ CHR$(0) 

150 PRINT # 1, CHR$(255) 

160 CLOSE 1 
170 CLOSE 15 

Regel 100 opent het hulp-kommando-ka- 
naal. 

Regel 110 opent het bestand met lengte 
50. 

Regels 120 en 130 rekenen L en H uit. 
Regel 140 geeft via het kommando-kanaal 
aan de disk het bevel de kop op 1000e 
positie te zetten. Dit duurt even omdat het 
bestand nu nog gemaakt moet worden. 
Regel 150 stuurt een letter naar het laatste 
(1000e) item. 

Daarmee wordt het hele bestand gevuld. 
Regels 160 en 170 sluiten de twee OPEN 
kanalen af. 

Nu bestaat het bestand. Het heeft een 
"record-lengte” van 51 en een bestands- 
lengte van 1000. 

Werken met het bestand 

Nu kunnen we met dit bestand gaan wer¬ 
ken. We kunnen vertellen waar we iets 
moeten lezen of schrijven en de kop van de 
disk daar neerzetten. Het verhaal is het 
zelfde als hiervoor met het 1000e item. Wil 
je item 500 schrijven dan vervang je 1000 
door 500. 

Met een PRINT schrijf je, met een INPUT 
lees je data. 


Een voorbeeldprogramma; 

100 OPEN 15, 8, 15 

110 OPEN 1, 8, 8,’TEST.REL, 

L,”+CHR$(51) 

120 L=101:H=0 

130 PRINT # 15,”P”+ CHR$(8)+ 

CHR$(L)+ CHR$(H)+ CHR$(0) 

140 PRINT #1, CHR$(255) 

150 PRINT CHR$(147) 

160 PRINT "lezen of schrijven (l/s) ?” 
170 GETA$:IFA$=””THEN170 
180 IF A$=”S” THEN 300 
190 IF A$ <> ”L” THEN 150 
200 REM 

210 REM ☆☆☆ LEZEN ☆☆☆ 

220 REM 

230 GOSUB 500 

240 INPUT # 1,A$ 

250 PRINT ”naam ”;LEFT$(A$,15) 

260 PRINT "adres ”;MID$(A$, 16,15) 
270 PRINT "plaats ”;RIGHT$(A$, 20) 
280 GETA$:IFA$=””THEN280 
290 GOTO 150 
300 REM 

310 REM ***SCHRIJVEN ☆ ☆☆ 

320 REM 

330 GOSUB 500 

340 INPUT "naam ”;A$ 

350 INPUT "adres ";B$ 


360 INPUT "plaats ";C$ 

370 S$=” 

380 R$=LEFT$(A$+S$, 15) 

390 R$=R$+LEFT$(B$+S$, 15) 

400 R$=R$+LEFT$(C$+S$, 20) 

410 PRINT # 1,R$ 

420 GOTO 150 
500 REM 

510 REM ☆☆☆ZET DE KOP GOED^ 
520 REM 

530 INPUT "welk record nummer ” ;A 
540 IF A=0 THEN 590 
550 H = INT(A/256) 

560 L=A-H^256 

570 PRINT# 15,”P”+ CHR$(8) + 

CHR$(L)+ CHR$(H) + CHR$(0) 

580 RETURN 
590 REM 

600 REM ☆☆ EINDE + FILES SLUITEN 

610 REM 

620 CLOSE 1 

630 CLOSE 15 

640 END 

Dit is slechts een aanzet tot het werken 
met files. Kijk in jouw situatie welke manier 
het gemakkelijkst is, en bedenk dat korte 
files het best sequentieel kunnen en lange 
files het beste relatief. • 




rGEBRUIKERS BOFFEN MAAR WEER! 

met nieuwe produkten en fikse prijsverlagingen 

Maak nu zelf uw Autostart-Modules met ZERO’S SOFT-PROM! 
Batterij gevoede, 8k Bytes, ’eeuwig’durend,extra geheugen met software voor C-64 
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32kB GEHEUGEN, uitbreiding, schakelbaar. 

64kB GEHEUGEN idem, met speciale Ramfile software. 
40/80 TEKENKAART, professioneel, 80 tekens per regel. 

UITBREIDINGSKAART, 2 slots, spaar uw konnektor. 

UITBREIDINGSKAART , 5 slots, schakelbaar, gebufferd. 

EPROMKAART, voor 2K, 4K en 8K EPROMS, instelbaar. 

UITBREIDINGSKAART, 2 slots. 

UITBREIDINGSKAART, 5 slots, schakelbaar. gebufferd. 

E P ROM KAART, voor 2K, 4K en 8K EPROMS, instelbaar. 

_ EPROMPROGRAMMER, zet eigen programma’s op EPROM. 
EPROMT|A^|SSER^/ist^EPROMsgelijkti)dig. 
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Nikkelstraat39 
2984 AM RIDDERKERK 
Tel. 01804 - 30 233 


• Alle prijzen excl. BTW 

• Verzending onder rembours of per 
vooruitbetaling. 

• Vraag kosteloos de uitgebreide folders aan. 


Ook zaterdags geopend 
Dealer aanvragen welkom. 
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Op de Microcomputer ’86-beurs in Frankfurt was ook een aantal kunstenaars 
uitgenodigd om de artistieke mogelijkheden van de computer te illustreren. Voor een 
deel ok een ging het hierbij om plastieken en collages van electronische onderdelen, 
maar er waren ook kunstenaars, die meer de electronica tot algemeen thema genomen 
hebben. In Amerika hebben prominente kunstenaars zoals Andy Warhol zich inmiddels 
vol vuur op de grafische mogelijkheden van de Amiga geworpen. 

COMPUTERKUNST 



Zijn 

computercreaties 
kunst met een 
grote K? 


K unst is de spiegel van iedere tijd. 
Het is dan ook niet verwonderlijk 
dat in ons tijdperk van automati¬ 
sering de computer zijn intree in 
de wereld van de kunst maakt. 
Met de computer kan de kunstenaar in 
feite twee kanten op: 

35 De computer zelf tot het onderwerp 
van kunst maken. 

36 De computer als een creatief medium 
gebruiken. 

In Europa is men nog wat schuchter met 
”computergraphics” als kunst en expres¬ 
sievorm. Computergraphics zijn bij ons 
wel bekend bij veel Artwork, dat in de 
reclame en ook bij buitenissige kleding 
gebruikt wordt. Echt kunst vindt men dat 
echter nog niet. 

De collages waarin computers of andere 
electronische onderdelen voorkomen ziet 
kunstminnend Europa wel als een poten¬ 
tiële kandidaat voor Kunst met een grote 
K. Op de Franfurtse beurs toonden kunste¬ 
naars als Petrus Wandrey plastieken en 
collages waaruit een grote fascinatie met 
de moderne electronische techniek 
spreekt. Men noemt deze kunstrichting 
Digitalismus, een trend met computers als 
thema en sosm onderdeel van het kunst¬ 
werk. 


Digitalismus 

De functionele strakke vormgeving van de 
Silicium-chips vormt de grondslag der 
nieuwe esthetica van het automatisering- 
stijdperk. Wandrey maakt van hen levendi¬ 
ge gedigitaliseerde dansers, die vol goede 
moed een nieuwe toekomst tegemoet tre¬ 
den. Het blijft echter niet bij gedigitaliseer¬ 
de dansers. Onder de Slogan "Hardware 



+ Software = Artware” wordt de nieuwe 
vormenstructuur doorgevoerd bij het ont¬ 
werpen van meubels, schilderijen, beel¬ 
den, juwelen, enz. 

Ook voor de grafische beeld bewerking 


begint zich in Europa belangstelling te 
ontwikkelen. Een eenmaal in het geheugen 
opgeslagen beeld is immers geen stati¬ 
sche prent en staat volledig open voor 
artistieke bewerking. Een kombinatie van 
kunstenaarswerktuig en visueel medium 
die met name in de V.S. snel aan populari¬ 
teit wint. 

AMIGA-Kunst? 

De vele ”Graphics”-opties en de hoge 
schermresolutie van de Amiga maken de¬ 
ze Commodore machine ideaal voor het 
creëren van Artwork. Steeds meer schil¬ 
ders, tekenaars en artiesten waaronder 
Andy Warhol raken enthousiast voor de tot 
op heden ongekende grafische mogelijk¬ 
heden van de Amiga. 

Dat de computer een bruikbaar medium is 
om de mens zich creatief te laten uiten zal 
niemand ontkennen. De vraag of Amiga- 
kunst ook echt Kunst is, heeft en zal in de 
komende jaren nog menige discussie uit¬ 
lokken. Sommige kunstenaars vrezen dat 
de grafische computer de menselijke bin¬ 
ding met de eigen creatie zal terugdringen. 
Emotieloze kunst dreigt volgens hen aan 
de computerhorizon. Andere kunstenaars 
voeren juist aan dat zij nu eindelijk al hun 
creatieve gedachten in beelden kunnen 
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omzetten of hun experimentele geest vol¬ 
ledig de vrije loop kunnen laten. 


AMIGA-kunst of -kunde 


De Amiga lijkt aan de wieg te staan van een 
nieuwe grafische kunstrichting. Misschien 
zal men in de toekomst van een ”Amiga- 
school” of iets dergelijks spreken. Even 
afgezien van het feit of de Amiga-platen nu 
kunst met een grote K zijn of niet: De 
Amiga biedt aan iedereen de gelegenheid 
om zijn of haar inspiratie in fraaie compu¬ 
terbeelden te vertalen. Graphics pakket¬ 
ten en -computers zijn nu niet meer voor 
de Happy Few maar iedereen kan daar¬ 
mee aan de gang. En dat is heel wat waard. 
Een geheel andere kunstvorm waarmee de 
Amiga ook furore begint te maken, is de 
muziek. Computermuziek stamt eigenlijk 
al uit de zeventiger jaren en is langzamer¬ 
hand ingeburgerd geraakt. De Amiga biedt 
de experimentele- en/of serieuze musici 
alles wat zij wensen. Ook hier verlossen 
geavanceerde machines als de Amiga de 
menselijke creativiteit van haar mechani¬ 
sche begrenzingen. 



Artwork 


Ondanks de toevoeging art wordt Artwork 
meer als een illustratie- dan kunstvorm 
gezien. Artwork vindt voornamelijk zijn 


toepassing bij reclame, video- en diapro- 
ducties, alternatieve decoratie en educa¬ 
tieve doeleinden. Toch kan er bij bepaalde 
Artworkplaten wel degelijk van computer- 
kunst gesproken worden. Het spel van 
kleurvlakken, lijnen en perspectief geeft 
daarbij grafische hoogstandjes die in me¬ 
nig museum voor moderne kunst niet zou¬ 
den misstaan. 

Een van de grootste Artworkproducenten 
in Nederland is het bedrijf Visual Services 
Benelux B.V. Deze firma heeft zich gespe¬ 
cialiseerd in het vervaardigen van diapre¬ 
sentaties, video/filmanimatie en spreken¬ 
de reclamebeelden. Ook bij hen is Artwork 
niet zo zeer kunst, maar eerder een doel¬ 
treffende aandachttrekker en animator. 
Niettemin getuigen bepaalde VSB-pro- 
ducties van een kunstzinnige visie, die in 
de toekomst meer aandacht behoort te 
krijgen. 

Computerkunst is tot op heden nog niet bij 
het grote publiek ingeslagen. Slechts een 
geselecteerde groep kunstminnaars aan¬ 
vaardt de graphics, plastieken en collages 
als Kunst. Het blijft een kwestie van smaak 
en wennen. 



UEARN ICW 1 
PPCGPAMJT 


The elementary Commodore 128 



De onmisbare handleiding voor Uw Commodore-128, 
door William B. Sanders. 



Bestellen kan alleen bij vooruitbetaling door overmaken van 
ƒ 44,90 op giro 3157656 Infolist Huizen met vermelding van: 
The Elementary C-128. Na ontvangst van Uw overmaking sturen 
wij U het boek op. 

Ook in de betere computerwinkel. 

INFOLIST 

Postbus 1047, 1270 BA Huizen, tel.: 02152-62343 
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Amiga’s werkbank, Intuition, is een schoolvoorbeeld van een gebruiksvriendelijke 
Ikoonbesturing. Zonder enige documentatie kan de gebruiker er al mee aan de slag. 
Volg slechts de eigen intuïtie zeggen de de ontwerpers van dit opmerkelijke gebrui¬ 
kersinterface. 




INTUITION 

voor 
de 

Amiga 


O f het gebruik van alleen de eigen 
intuïtie voldoende is om Amiga’s 
werkbank te doorgronden valt 
te betwijfelen. De gebruiker 
dient toch wel over enige kennis 
van computers en gevoel voor ikonen te 
beschikken. Niettemin blijft Intuition 
een knap ontworpen gebruikersinter¬ 
face. 

De gebruiksvriendelijkheid van Intuition 
berust op de gemakkelijke herkenbaarheid 
van de keuzeikonen. Ook op de Macin¬ 
tosh, de ATARI ST-serie en andere met 
GEM-versies toegeruste personal compu¬ 
ters vindt men ikonenmenu’s. Geen van 
hen gaat echter zo ver in overzichtelijkheid 
en bedieningsgemak. 

Om met Intuition te starten is het noodza¬ 
kelijk om eerst de systeemsoftware te la¬ 
den. Het openen van de werkbank gaat als 
volgt: Zet de muiscursor op Workbench 
disk-ikoon en klik de linker muisknop kort 
in. Deze procedure vertelt de Amiga dat u 
met de werkbank aan de slag wilt en het 
werkbankvenster verschijnt in de linker 
bovenhoek van het scherm. Rest nog het 
openen. Dat kan op twee verschillende 
manieren: 

Q Beweeg de muiscursor (pointer) naar 
een ikoon en klik de linker knop twee maal 
in. Deze methode heet "doublé clicking” 
en stelt de gebruiker in staat om in een 
handeling een ikoon te kiezen en te 
openen. 

©Via het werkbankmenu; Houdt de rech¬ 
ter^ menukeuze) muisknop ingedrukt en 
beweeg de pointer naar het woord Work¬ 
bench links op de menubalk. De eerste 
optie is op het aldus getrokken werkbank¬ 
menu is gewoon OPEN. Beweeg de poin¬ 
ter met nog immer ingedrukte rechter 


muisknop naar deze optie en laat de me- 
nukeuzeknop los. Deze methode werkt 
iets omslachtiger dan de eerste. 

De ikonen 

Qua functie kan men de werkbankikonen 
in drie verschillende typen verdelen: 

^.De Tools of gereedschappen die pro¬ 
gramma’s kunnen openen, hier toe beho¬ 
ren de Preferences- en Clockikonen. 
t De Drawers of laden. Deze vormen een 
visuele display van het diskdirectory en er 
kunnen, net als bij een echte lade, objecten 
ingestopt en uitgenomen worden. Tot de 
laden behoren de Demos-, Utilitys- en 
System-ikonen. 

|De Trashcan of prullenmand waarin u 
ongebruikte programma’s of onderdelen 
daarvan kunt deponeren. Zij zijn gelukkig 
niet voorgoed verloren tenzij u de bak met 
het Empty-ikoon leegt. 

Alle ikonen openen additionele vensters 
en werken als trekmenu’s. Ook de nieuwe 
vensters kunnen weer Tools en drawers 
bevatten. 

De werkbankbesturing; 

Intuition kent drie soorten controlesyste¬ 
men met elk hun eigen doelgebied: 

O Zogenaamde Gadgets besturen de ver¬ 
schillende vensters. De Close-gadget sluit 
een geopend venster door de pointer op 
de closebox te zetten en de rechter muisk¬ 
nop in te klikken. 

De Dragbar-gadget stelt de gebruiker in 
staat om het venster over het scherm te 
bewegen. Zet de muiscursor op de Drag- 
barbox, klik de selectieknop in en houd 
deze tijdens het verplaatsen ingedrukt. 
Loslaten fixeert het venster in diens 
nieuwe positie. 


Sizing- en Scroll-gadgets veranderen res¬ 
pectievelijk de grootte van het venster en 
scrollen op/neer en links/rechts langs alle 
Intuition-vensters. 

Een Disk Gauge-gadget informeert de ge¬ 
bruiker over de nog beschikbaar ruimte op 
de gebruikte diskette. Het handboek 
noemt deze ruimte ook wel "volume”. 

De Back- en Front-gadgets maken het 
mogelijk om de volgorde van de aftrekven- 
sters te veranderen. 

©Ikonenbesturing: Het is mogelijk om 
ikonen van het ene venster naar het andere 
te verplaatsen. Dat kan op dezelfde disk, 
maar ook tussen verschillende werk- 
schijven. 

Zet de muispointer op het gewenste ikoon. 
Druk de selectieknop op de muis in en 
houdt deze ingedrukt tijdens het transport 
naar de nieuwe schermpositie. Bij ikonen- 
transfers op dezelfde disk worden de data 
van de bronlokatie gewist en op de nieuwe 
lokatie ingevoerd. Het verplaatsen naar 
een andere disk gaat via een copiëer- 
proces. 

Verder biedt de ikonenbesturing via het 
werkbankmenu de opties Rename, Dupli- 
cate en Discard. Tezamen met de transfe- 
ropties heeft de gebruiker zo de gelegen¬ 
heid om de werkbank geheel aan de Qigen 
smaak aan te passen. 

0 Schermbesturing; Sommige program¬ 
ma’s lopen niet in een venster, zij beheer¬ 
sen het totale beeldscherm. Een treffende 
voorbeeld zijn de onder het Preferences- 
ikoon geopende programma’s. Hierbij 
kunt u niet over de Close- en Size-cadgets 
beschikken en is de enige manier om een 
draaiend programma te beëindigen de 
Cancel-box. Ook kent Preferences geen 
Pull Down -menu’s. Alleen via de Back- en 
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Front-gadgets is het mogelijk een ander 
venster of de werkbank zelf in beeld te 
krijgen. Deze gadgets stoppen de Prefe- 
rences tijdelijk achter het gekozen venster. 
De werkbank zelf controleert ook het hele 
beeldscherm inclusief de aftrekmenu’s en 
de multy tasking display in de vensters. 

Requesters en Alerts 

Requesters zijn communicatiebood¬ 
schappen tussen de gebruiker en de ver¬ 
schillende tools. Elk stuk gereedschap 
heeft zijn eigen boodschappen op maat. 
Als u bijvoorbeeld de disk vol is vraagt 


Intuition vriendelijk of u een nieuw exem¬ 
plaar wilt inzetten. Deze vraag kan dan met 
ja of nee beantwoord worden. 

Alerts zijn flitsende waarschuwingen die 
de gebruiker er van verwittigen dat niet 
alles gaat zoals het zou moeten. De waar¬ 
schuwing vraagt de operateur te wachten 
totdat het systeem de zaken weer op orde 
heeft gesteld. Gaat u toch door dan is de 
kans op crashen en een automatische 
systeemreset, met verlies van alle ongesa¬ 
vede data, groot! 

Een bekende Alert is het gebrek aan ge¬ 
heugencapaciteit tijdens multy tasking- 


Korter laden 
met cassette 


D e Commodore computers heb¬ 
ben een vrij zekere, maar ook 
trage manier van wegschrijven 
naar de cassetterecorder. Ze 
schrijven programma's name¬ 
lijk steeds in korte stukken, twee keer 
achter elkaar naar cassette. Dit wordt 
gedaan om fouten tijdens het laden te 
kunnen signaleren. Maar het kan korter. 
In dit artikel van Courbois gaan we daar¬ 
om in op het cassettegebruik. 

Stop maar eens een bandje in een normale 
recorder. Eerst hoor je een hoge pieptoon, 
dan wat gekras en weer even een hoge 
toon. Dit is de kop (header) van het pro¬ 
gramma. In die kop staat de naam van het 
programma plus het begin en het einda- 
dres. 

Geknars 

Na de tweede piep komt het eigenlijke 
programma pas. Dit bestaat uit een gekras 
met precies op de helft een pieptoon van 
een kwart seconde. Die korte piep geeft 
aan dat het programma nu voor de tweede 
keer is geladen. De computer doet echter 
niets met de tweede opname. Deze wordt 
vergeleken met wat er al is ingeladen. Is de 
vergelijking goed dan komt er een eind aan 
het woord ready, is de vergelijking niet 
100% dan komt er ?load error te staan. 
De les hieruit zou kunnen zijn, dat als we er 
zeker van zijn dat een programma goed op 
tape staat we de laad-tijd kunnen halveren. 
We hebben dat tweede stuk dan niet meer 
nodig. We kunnen na de halve laad- tijd de 
cassette stoppen door op de RUN/STOP- 
toets te drukken. 

Maar pas op! Dit programma kan nog niet 
met RUN gestart worden. Doordat je de 
laadopdracht niet hebt afgemaakt zijn een 
aantal geheugenplaatsen nog niet van de 


juiste waarden voorzien. De computer 
weet bijvoorbeeld nog niet hoe lang het 
programma is. 

Voor een machinetaal (geheel machine¬ 
taal) programma maakt dit niets uit. Je 
kunt het met een SYS-kommando starten. 
Basic programma’s werken echter iets an¬ 
ders. Doordat de variabelen meteen na het 
programma staan moet het eind van het 
programma bekend zijn. Nu kunnen we het 
eind meedelen aan de computer door het 
volgende in te tikken (VIC en 64): 
poke 46, peek (832): poke 48, peek (832): 
poke 50, peek (832) 

poke 45, peek (831): poke47, peek 
(831):poke 49, peek (831) 

Nu kunnen we het programma runnen. 
Voor Basic programma’s kun je ook nog 
iets anders doen. Tik deze twee regels als 
eerste twee van het programma in en save 
dan het programma. Laad je het later in en 
stop je het halverwege dan kun je meteen 
met RUN starten. 

Pas op met stoppen, niet te snel, pas als 
het programma echt over de helft is werkt 
het allemaal. Iets te laat stoppen mag, iets 
te vroeg niet. 



Basic heeft onderin het RAM-geheugen 
een groot kladblok waar van alles wordt 


opdrachten. 256K is toch wel krap beme¬ 
ten voor zo’n krachtige machine als de 
Amiga, maar bij de in Europa nu standaard 
512 KB-uitbreiding, doet deze melding 
zich aanzienlijk minder voor. 


Intuition is de gebruiksvriendelijkste en 
krachtigste gebruikersinterface die 
momenteel op een Personal computer 
draait Van af het begin geheel op de 
eigen intuïtie varen blijft een illusie. Na 
een korte inwerkperiode wijst het ge¬ 
bruik zich echter van zelf. 


bijgehouden. In zo’n 1024 geheugen¬ 
plaatsen worden belangrijke en minder 
belangrijke dingen onthouden. Door ge¬ 
bruik te maken van het POKE-komman- 
do kunnen we daar veranderingen in 
aanbrengen, en met het PEEK-kom- 
mando kunnen we we zien wat daar 
staat. 

Een aantal van die geheugenplaatsen zul¬ 
len we nog eens bekijken. Ik zet bij elke 
plaats of het een PEEK of POKE -komman¬ 
do betreft. 

1 

7PEEK (1)AND16. Als dit een 0 oplevert 
dan is er geen toets ingedrukt op de cas¬ 
setterecorder. 

Een waarde 16 betekent dat er een toets 
op de cassetterecorder is ingedrukt.(PU\Y 
of REWIND of F.FWD). 

43 

7PEEK (43)+256*PEEK (44). Dit is het 
adres waar het basic programma begint. 
Meestal is dat bij een normaal basic pro¬ 
gramma het getal 2049. 

45 

7PEEK (45)+256*PEEK (46). Dit geeft het 
eind van een programma aan. Trek je van 
dit resultaat het resultaat van wat erbij 43 
staat af, dan heb je de lengte van het 
programma in bytes. 

55 

7PEEK (55)+256*PEEK (56). Dit geeft de 
top van het Basic gebied aan. Daarboven 
kan een basic programma niet komen. Dit 
heeft een ander voordeel. Gaan we dit 
adres met een POKE veranderen dan kun¬ 
nen we een machinetaal programma be¬ 
schermen tegen overschrijven door Basic. 
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X=top van geheugen:POKE 56,X/256:PO- 
KE 55,X-PEEK (56)*256. 

Hiermee komt de top op X te staan. 

144 

?PEEK (144). Dit moet na het laden van 
een programma gelijk zijn aan nul (0). Is dit 
nu niet een 0 dan is er een load error 
geweest, ook al hoeft er geen load error- 
boodschap te zijn geweest. Een extra test 
of het programma goed was. 

186 

9PEEK (186). Dit geeft aan welk apparaat 
het laatst gebruikt was. Een 4 betekent 
printer, een 1 cassettte en een 8 floppy 
disk. Je kunt dit gebruiken als je een 
programma wilt doorladen als het uit twee 
stukken bestaat. Met een PEEK op adres 
186 kun je zien of de vorige LOAD van 
cassette of disk af kwam, en dus waar het 
tweede deel vandaan moet komen. LO¬ 
AD””,8 of LOAD””,1. 

197 

7PEEK (197). Dit vertelt welke toets er is 
ingedrukt. Geeft dit de waarde 64 dan is er 
geen toets ingedrukt. Elke andere waarde 
betekent dat er iets is ingedrukt, je kunt de 
nummers ervan even proberen. 

Je kunt nu ook meten hoelang een toets 
ingedrukt blijft (dat is leuk voor bv. reak- 
tiesnelheid en -tijd meten). 

198 

POKE 198,X. Deze POKE gaat in kombina- 
tie met een paar anderen. Geheugenplaats 
198 geeft aan hoeveel toetsen er al zijn 
ingedrukt. Denk bijvoorbeeld aan het feit 
dat je toetsen vooruit kunt intikken voordat 
ze op het scherm verschijnen. Deze toet¬ 
sen worden bewaard in de toetsenbord- 
buffer en in geheugenplaats 198 staat hoe¬ 
veel toetsen er al vooruit zijn ingedrukt. Dit 
mogen er maximaal 10 zijn! 

De buffer staat vanaf geheugenplaats 631 
tot 640. We kunnen die al van te voren vol 
zetten. 

POKE 198,4:POKE 631,82:POKE 

632,85:POKE 633,78:POKE 634,13 

Dit zet het woord RUN op het scherm en 
geeft er een RETURN overheen. Het pro¬ 
gramma start. 

De 82 is de ASCII-waarde van r,85=u, 
78=n. De 13 is de RETURN- toets. 

POKE 198,1: POKE 31,131 

Dit simuleert het indrukken van de shift- 
run/stop toets. 

204 

POKE 204,1 zet de cursor weer uit totdat er 
een INPUT komt of READY verschijnt. 


209 

?PEEK(209) + 256* PEEK¬ 
EI 0)+PEEK(211) geeft je de positie van 
de cursor op het scherm te weten. De 
eerste positie links boven is normaal 
1024. 

Ook kan de cursor hiermee op een plaats 
op het scherm worden neergezet. Ik ga er 
hierbij vanuit dat het scherm op de nor¬ 
male plaats staat ($0400). 

X is het regelnummer. (0 tot 24). 

Y is de positie op de regel. (0 tot 39). 

10Z=1024+40*X. 

20 POKE 210,X/256; POKE 209,X-PEEK 
(210)*256. 

30 POKE 211,Y. 

Na deze 3 regels staat de cursor op die 
positie en kan met een print iets worden 
neergezet. 

646 

POKE 646,X verandert de kleur van de 
cursor. X is dan de kleurwaarde. Dit is dus 
hetzelfde als via een PRINT een CTRL- 
KLEUR afdrukken. 

650 

POKE 650,128. Dit zet de repeteer funktie 
aan. Na deze POKE gaan alle toetsen 
herhalen als je ze indrukt. 

Bij POKE 650,0 repeteren ze niet meer. 


828 

Begin van de cassette-buffer. 

?PEEK (829)4-256^PEEK (830) geeft het 
beginadres van het programma, dat net 
geladen werd van de cassette. 

7PEEK (831)+256*PEEK (832). geeft het 
eindadres van het zojuist geladen pro¬ 
gramma. 

Deze laatste twee kunnen worden gebruikt 
om een machinetaalprogramma te lokali¬ 
seren. 

A$=””:FORI=833 TO 850: A$= A$+ 
CHR$ (PEEK(I)): NEXTI:?A$. 

Dit drukt de naam van het programma af 
dat zojuist via de cassette werd geladen. 
Dit gaat MET de verborgen tekens, die er 
eventueel instaan! m 
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HardBall 

De realistische sportsimulaties 
beginnen zo langzamerhand 
een ware softwarerage te wor¬ 
den. Tennis, golfen, winter/zo¬ 
merspelen, boksen noem maar 
op. Er is voor elk wat wils. 
Aackosoft introduceerde on¬ 
langs het baseballspel Hard¬ 
Ball. Het gaat hier om een boei¬ 
ende en grafisch goed verzorg¬ 
de baseballwedstrijd tussen de 
All Stars (rood en joystick 1) en 
de Champs (blauw en joystick 
2). Beide partijen kunnen uit of 
thuis spelen. 

Hardball is zeker geen ordinair 
spelletje bal rammen met de 
joystick. Er moeten wel over¬ 
wogen beslissingen aan¬ 
gaande: 

- management; het inzetten 
van de spelers op hun speciale 
talenten, het verdelen van de 
honken en het kiezen van de 
veldposities. 

- de keuze van de bal; super 
snelle- en gewone Fastball, 
Offspeed, Change-up, Curve 
ball, Screwball, Sinker, en 
slider. 

- naar welk honk de gevangen 
bal gegooid moet worden om 
de tegenstander uit te maken, 
-slagstrategie; o.a. stootslag, 
honkstelen e.d. 

- De plaatsing van de pitch; o.a. 
hoog, binnen e.d., genomen 
worden. 

De (menu-)keuze gaat via de 
joystick. Dat werkt soms wat 
verwarrend. In alle gevallen 
stuurt de joystick de cursor 
naar de gewenste keuzemoge¬ 


lijkheid. Bij de spelkeuze en 
beslissingen van het manage¬ 
ment geeft een druk op de 
vuurknop de activatie van de 
gevraagde optie. In de : spelsi¬ 
tuatie (als slagman of pitcher) 
behoort de vuurknop echter in¬ 
gedrukt te blijven totdat de ge- 
.wenste keuze van aanvals- of 
verdedigingsstrategie bereikt 
is. Het los laten van de vuur¬ 
knop maakt de keuze dan per¬ 
manent. Het loslaten van de 
vuurknop resulteert tevens in 
het vrijgeven van de armbewe¬ 
gingen van de pitcher en een 
slag van de slagman. Het is 
allemaal even wennen. 
Hardball kent vier schermen: 
Het Manager Decision scherm 
geeft de speleropstelling, wie 
er aan slag is en op welk honk 
staat, hoe de spelers slaan, de 
plaats waarop ze spelen en 
hun slaggemiddelde voor bei¬ 
de teams. Onder de namenlijst 
staan de verschillende mana¬ 
gement- beslissingen die met 
behulp van de spelpook geko¬ 
zen kunnen worden. Met een 
druk op de spatiebalk start de 
wedstrijd. 

Het Pitcher/batter scherm laat 
werper, vanger, slagman en 
scheidsrechter in fraai gede¬ 
tailleerde graphics zien. Op de 
achtergrond zien we vaag een 
ooooh! roepend publiek. On¬ 
deraan het scherm staan de 
verschillende slag/pitch-opties 
en een overzichtsschets van 
de honkbezetting. 

De beide overige schermen la¬ 
ten respectievelijk het linker- 


en rechter speelveld zien. Zo¬ 
dra de bal geraakt is komt het 
desbetreffende speelveld in 
beeld en knippert de speler die 
de bal zal gaan vangen. Deze 
veldspeler kan dan met de joy¬ 
stick verplaatst worden. 
Hardball scoort hoog in zijn 
realistische benadering van 
een (Amerikaanse) Baseball 
wedstrijd. De verschillende 
spelers met hun specifieke ta¬ 
lenten en zwakheden, de ma- 
nagersbeslissingen, de vele 
strategische slag/vang/pitch/ 
veld -mogelijkheden en het ge¬ 
luid (kompleet met volkslied en 
publiek) maken dit game tot 
meer dan een doorsnee sport- 
spelletje. 

Voor ƒ 59,50 op cassette met 
Nederlandse gebruiksaanwij¬ 
zing van Aackosoft. 

Kinetic Connection 

Een verrassend puzzelspel van 
Aackosoft (Datamost) waarbij 
de aloude legpuzzel nieuw le¬ 
ven wordt ingeblazen. Het 
grappige en ook moeilijke van 
de 16 puzzels is dat ze in een 
matrix over het scherm bewe¬ 
gen. De bedoeling is dat u met 
de joystick de verschillende 
hokjes onderaan het scherm 
op de juiste plaats in het puz- 
zelscherm zet. 

Na het laden van de diskette 
worden met joystick en vuur¬ 
knop de verschillende spelop- 
ties gekozen: -Play-mode; In 
de competitive-mode gaat het 
om de punten. De computer 
telt meedogenloos af en kent 


strafpunten toe voor het ge¬ 
bruik van hulpfuncties zoals 
Get. In de Non-Competitive- 
mode gaat het gewoon op het 
dooie akkertje zonder pun- 
tendwang. 

- Breakup Matrix; Bepaalt het 
aantal puzzelstukjes van rela¬ 
tief eenvoudig (2x2, 4x4 stuk¬ 
jes) tot gecompliceerd (256 
stukjes). 

- Micro-Kinema; Kiest de 16 
verschillende puzzels. De puz- 
zelonderwerpen van auteur 
Sadato Taneda zijn nogal on¬ 
gewoon. Zij dragen poëtische 
namen als Midnight Express 
en de Big Red One en variëren 
van een voorbij varend zeil¬ 
schip en een nachtelijke post¬ 
duif tot langs vliegende 
snacks. 

- Start; start het puzzelen. 

- De hulpfuncties onder HELP; 
View laat de complete puzzel in 
het linker boven-schermkwart 
zien. Susp zet de puzzelbewe- 
ging stop. Get brengt het met 
joystick en vuurknop gekozen 
puzzelstukje op juiste matrix- 
plaats. 

Verder is er nog de geen pun¬ 
ten kostende muteopdracht 
voor het aan/uitschakelen van 
het geluid. 

Om het competitieelement te 
bevorderen bestaat de moge¬ 
lijkheid om de gescoorde pun¬ 
ten in de (te saven) erelijst op te 
nemen. 

Een geheel nieuwe vorm van 
puzzelen. Op disk met Neder¬ 
landse handleiding voor ƒ 69,-. 
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Borrowed 

Time 

Plotseling bent u private eye 
Sam Harlow in het kwade 
jaar 1934. Is de speler jager 
of prooi? In ieder geval heeft 
iemand het op Sarn’s leven 
voorzien en kan elke actie 
ook noodlottige gevolgen 
hebben! 



Het is Activision weer gelukt! 
Dit fameuze Amerikaanse soft¬ 
ware- huis, ontwerper van vele 
succesvolle adventures, heeft 
een nieuw intrigerend tekst- & 
graphics-adventure voor de 


C64/C128 ontworpen. Het 
Haarlemse Ariolasoft impor¬ 
teert voor tl 69,- de diskette 
waarmee u, na het intypen van 
L0AD”*”,8,1, in de afgesleten 
schoenen van de privedetecti- 
ve Sam Harlow belandt. 

Kant 1 is de demo en begint 
ronduit schokkend. Een akelig- 
en potig karakter slaat met zijn 
vuist het glas (met firmanaam) 
van Sam’s kantoordeur in. Een 
voorproefje van de manieren in 
het door gangsterpraktijken 
beheerste Amerika van 1934. 
Op ”2” drukken geeft tekst en 
uitleg plus een aantal grafische 
demo’s. Hier leert de speler 
hoe hij de diverse karakters 
moet toespreken en handelin¬ 
gen kan verrichten. Het indruk¬ 
ken van toets”1 ”, gevolgd door 
de opdracht de diskette om te 
draaien, start het spel. 

Aan het begin van het avontuur 
ligt Sam met zijn voeten op het 
bureau van zijn kantoor. 


Rechts in beeld staan twee ko¬ 
lommen met Engelse woorden 
voor het geven van opdrach¬ 
ten. In de linker staan de wer¬ 
kwoorden, in de rechter de 
zelfstandige naamwoorden. 
Met de door de joystick (in 
poort 2) bestuurde cursor wijst 
u bijvoorbeeld GET en PHONE 
aan en drukt na elke keuze de 
vuurknop in. Het resultaat is 
dat Sam de telefoon opneemt. 
Behalve het gebruik van het 
keuzemenu kan de speler ook 
zelf opdrachten intypen. Daar¬ 
bij kan de tekstparser (de 
woorduitlegger van de compu¬ 
ter) tamelijk ingewikkelde zins¬ 
constructies aan. Bijvoorbeeld 
’TALK TO MAN AND SHOW 
GUN”. 

Vanzelf gebeurt er niets en u 
zult als detective Harlow de 
actie moeten starten. SEARCH 
OFFICE (doorzoek het kantoor) 
levert weinig op. Wel gaat de 
telefoon rinkelen en vertelt een 


langzaam wegstervende stem 
dat iemand (?) u onder de groe¬ 
ne zoden wil werken. Klik...., 
einde gesprek. Daarna ver¬ 
schijnt er een duistere scha¬ 
duw voor het raam.... Gelukkig, 
het is slechts de glazenwasser. 
Hier konden wij het niet nalaten 
om te kijken of dit adventure 
wel fooi proof is. Het program¬ 
ma liet zich echter niet kisten 
door de opdracht de glazen¬ 
wasser te vermoorden. Zijn do¬ 
de ogen kijken u niet begrij¬ 
pend aan en de politie voert 
Sam gevankelijk af. Einde spel! 
GO EAST levert meer succes 
op. In het kantoortje van Har- 
low’s secretaresse en vriendin 
ligt een interessant notitieblok- 
je en er is verder naar het oos¬ 
ten ook nog een trap die naar 
het steegje beneden leidt. In 
deze steeg bevinden zich twee 
killers die direkt hun pistolen 
trekken. Spelers met veel zelf¬ 
vertrouwen denken wellicht 
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MINIMAAL 


25% KORTING 

D ' E WETE ° R ^ E ~ w R e? e F n E ®SIONALS 


OP PRINTERS EN !■ 

COMPUTERS. 3 MAANDEN GARANTlZ 

van: voor; 


ATARI 520 ST 
COMMODORE PC 10 
COMMODORE PC 10, 10 Mb 
COMMODORE PC 10, 20 Mb 
| EPSON FX 85 F/T 
5 EPSON FX 105 F/T 
STAR SG 10 
WITOH SX 100-P 
PANASONIC KX-P1080 
PARALLELKABEL 
10 Mb DRIVE + KONTR. 

20 Mb DRIVE + KONTR. 
HIGH RES. KAART 

RS 232 C KAART + CLOCK 
1,5 M RAM KAART 
MULTIFUNCTION KAART 
MON. BEELDSCHERM 12" 


f. 2.890,- f. 1.807,- 
f. 4.995,- bel 
f- 7.750,- bel 
f - 8.750,- bel 
f. 2.155,- f. 1.499,. 
f - 2.795,- f. 1.950,- 
f. 1.290,- f. 899,- 
f- 1195,- f. 599 . 

f. 1.450,- f. 1.055,- 
f - 150,- f. 49 ,. 
f ■ 2-755,- f. 1.849,- 
f. 3.755,- f. 1.899,. 


f. 1.250,- 
f. 470,- 
f. 780,- 
f. 740,- 
f. 760,- 


f. 

f. 

f. 

f. 

f. 


750,- 

245,- 

590,- 

610,- 

349,- 


computer cash & 
carry Nederland bv 

Brouwersstraat 15 

5473 HB „eeswijk'-DIditisr 04139-3192 




VOOR DE GOEDKOOPSTE 
DISKETTES IN DE BENELUX!!! 


Nashua „No Name” 5,25 inch SS/DD 

30 tot 100 stuks 21,95 (per 10 stuks verpakt) 
110 tot 500 stuks 19,95 (per 10 stuks verpakt) 

Nashua „No Name” 5,25 inch DS/SS 

30 tot 100 stuks 23,95 (per 10 stuks verpakt) 
110 tot 500 stuks 21,95 (per 10 stuks verpakt) 

Minimale afname 30 stuks (3 pakjes) 

R.P.S. Flexette DS/DD 

30 tot 100 stuks 33,50 (per 10 stuks verpakt) 
110 tot 500 stuks 31,00 (per 10 stuks verpakt) 

PRIJZEN incl. 19% BTW en Vracht. 



In ALPHEN bij „Opus 4”, De Aarhof 4, 

2406 BT Alphen aan den Rijn, tel. 01720-75856 

Afhaaladres UTRECHT en omstreken: 

„De cassette en diskettespecialist” 

Ant. Matthaeuslaan 19, Utrecht, 030-731826 
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het uit te kunnen schieten. Hier 
laten de talenten van Sam ech¬ 
ter verstek gaan en alleen de 
vlucht in het nabij gelegen ho¬ 
tel voorkomt het vroegtijdig 
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hulp die het adventure u biedt 
is de Borrowed Time, de moge¬ 
lijkheid om de spelstand voor 
een kritieke fase op kant 1 te 
saven. Dan behoeft de speler 
niet meer helemaal van voren 
af aan te beginnen. 

Borrowed Time is een boeiend 
en goed verzorgd adventure. 
De graphics zijn sfeervol uitge¬ 
werkt en op het incidentele ge¬ 
luid valt niets aan te merken. 
Aanbevolen! 


verscheiden van de held. Ver¬ 
der verklappen wij niets van de 
plot. 

Net als bij elk goed adventure 
komt het er bij Borrowed Time 
op aan om elke informatiestro- 
halm te benutten en bruikbare 
objecten mee te nemen. Door¬ 
zoek laden en vertrekken naar 
mogelijke aanwijzingen, leg 
voorzichtig kontakt met perso¬ 
nages die wellicht meer van de 
zaak afweten, maak notities en 
houdt een kaart bij. De enige 


CHICKIN CHASE 

Over de problemen in de 
pluimveehouderij gaat Chic- 
ken Chase van Ariola Soft (Fi- 
rebird). Het leven van een haan 
blijkt daarbij verre van gemak¬ 
kelijk. Niet alleen liggen er vol¬ 
hardende eierrovers op de 
loer. Ook mevrouw Hen moet 
aan haar trekken komen an¬ 
ders zwaait er wat! 

Het grafische intro van deze 
cassette is leuk uitgewerkt en 
grappig. De goed verzorgde 


hanekop geeft de toeschouwer 
zelfs een vette knipoog. Jam¬ 
mer genoeg weet men tijdens 
de animatie dit grafisch niveau 
niet te handhaven. Met name 
de nek van Pa Haan ziet er 
nogal trapperig uit en Ma Hen 



brengt het niet veel verder dan 
een witte bol met poten en 
deegroller. 

De plot, met een wat flauwe 
dubbele bodem, is alsvolgt: In 
de kippeschuur ziet u een deur 
met een rood hart, daarnaast 
een bel, een hooizolder met 
twee ladders naar boven en 
vier schuuringangen. De be¬ 
doeling is dat Pa eerst via de 
deur Moe Hen aan haar trek¬ 


ken helpt. Die kan vervolgens 
een ei op de hooizolder depo¬ 
neren. Daarna komen de eier¬ 
rovers in de vorm van egels en 
bovenmaatse muizen. Hane- 
mans kan deze eiergappende 
onverlaten door middel van 
punten opleverende snavel- 
houwen (druk op de vuurknop) 
verdrijven. Lukt de roof dan 
klinkt er droevige muziek en 
treedt Moe Hen met de deeg¬ 
roller naar buiten. De daarop¬ 
volgende mishandeling van de 
onhandige haan kost een 
leven. 

Heeft de haan wel succes dan 
komt het ei uit en trekt het 
kuiken aan de bel. Kassa wat 
de punten betreft, minder als 
Moe Hen nog niet bevredigd is, 
want dan zwaait die deegroller 
weer! Verder kan de haan 
extra levens vergaren door uit 
de grond op stekende wormen 
te verorberen. 

Voor wie van dit soort spellet¬ 
jes houdt op cassette voor 
ƒ15,95. 


TASWORD 80 -KOLOMS 


Deze maand komen er nogal wat 
nieuwe en erg diepgaande pakketten 
op de markt. De nieuwe SuperScript van 
PS is er nu, maar ook anderen bieden 
zeer interessante produkten voor de 
serieuze tekstgebruiker. Tasman Soft¬ 
ware uit het Engelse Leeds (importeur 
Filosoft) heeft na versies voor de ZX- 
Spectrum, MSX- en Amstrad (Schnei- 
der) computers nu ook een Tasword 
voor de Commodore ’64 het licht doen 
zien. 

De belangrijkste eigenschap van het pro¬ 
gramma is dat de gebruiker naar keuze 
met 40 of 80 kolommen per regel kan 
werken, waarbij voor de 80-kolomsmode 
GEEN 80-kolomskaart behoeft te worden 
aangeschaft: er is een slimme software¬ 
oplossing bedacht. 

Niet dat het beeld nu direkt vergelijkbaar is 
met dat van bv. de 80-koloms mode van 
een C-128 of PC-10, het is wat gedrongen 
en op een gewone TV komt het niet mooi 
over, er is echt wel een goede monochro¬ 
me monitor voor nodig. Maar dan is het 
resultaat ook, dat je tekst in de normale 
breedte kunt bekijken en bijvoorbeeld 
goed de layout kunt overzien. Andere pro¬ 
gramma’s als bv. Aackotext hebben daar 



ook wel een voorziening voor met een lay¬ 
out scherm, maar dan zijn de letters niet 
meer herkenbaar. 

Tasword 64 is zo de eerste tekstverwerker 
voor de Commodore 64 waarbij men in 
een oogopslag op het scherm kan zien, 
wat er op de printer gaat verschijnen. Het 
programma is nog helemaal nieuw, dus we 
komen er nog op terug, maar geven alvast 
een overzicht van wat eigenschappen. 

Eigenschappen TASWORD ’64 

o 80 kolommen per regel op het scherm 
zonder extra hardware, met één toetsin- 


druk om te schakelen naar 40 kolommen 
per regel en vice versa. 

o Automatische woordomslag en rechts 
uitvullen. 

o Blokken tekst verplaatsen en kopiëren, 
een invoeg-mode, vrij definieerbare kant¬ 
lijnen. 

o Twee helppagina’s, 
o Zoek- en vervang funktie. 
o Met bijgevoegde TRAINER, een tutor in 
de vorm van een tekstbestand dat ook de 
prilste beginner binnen een uur aan het 
tekstverwerken zet. 
o Headers en footers. 
o Aantal kopieën instelbaar, 
o Paginanummering instelbaar, 
o Voor gebruik met cassetterecorder en/of 
diskdrives, tot een maximum van 4 tegelij¬ 
kertijd. 

o Geschikt voor Commodore-printers en 
printers met een parallel poort, 
o Het programma is vanuit het menu aan 
te passen aan individuele wensen en mo¬ 
gelijkheden. Als belangrijk punt vermelden 
we dan nog, dat zowel het programma zelf 
als de (duidelijke) handleiding Nederlands¬ 
talig zijn. 

De Nederlandstalige versie wordt voor 
ƒ 99,- door Filosoft geleverd, tel: 050- 
137746, waarbij men door een extra Servi- 
ce-kaart de klanten nog ondersteuning 
geeft. 
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Culicom 

Culinaire avonturen per com- 



Met 13.000 complete menu’s 
kan men met het programma 
CULICOM even uit de voeten 
als kok. Hornsoft (020-261198) 
brengt dit creatieve program¬ 
ma voor de thuis-restaurateur 
uit voor ƒ159,-- 


Intracourse 

Sex per computer 

Tot op heden bestond de enige 
relatie tussen homecomputer 
en sex uit een aantal dubieuze 
pomogames en Strippoker. 
Leigh Rothschild, de president 
van de Amerikaanse Intra Cor¬ 
poration, ziet de computer ech¬ 
ter als een serieuze voorlichter. 
Onlangs introduceerde hij het 
uit drie modulen bestaande ln- 
traCourse pakket. IntraCourse 
behandelt ondermeer de sen¬ 
sualiteit, sexuele voorkeur en 
fantasie, en beantwoordt de 
letterlijk en figuurlijk branden¬ 
de vragen. 

IntraCorp heeft ruim twee jaar 
over de ontwikkeling van dit 
voorlichtingspakket gedaan. 
Veertien staffunctionarissen, 
onder wie diverse psycholo¬ 
gen van naam, ontwikkelden 
een produkt dat volgens Roth¬ 
schild aan de wieg van een 


geheel nieuwe softwarelijn 
staat. Behalve IntraCourse zal 
de Intra Corporation begin 
1986 nog een aantal nieuwe op 
sex gerichte software pakket¬ 
ten op de markt brengen. De 
prijzen bewegen zich tussen 
de ƒ 100 en ƒ 300 en dat maakt 
de conventionele voorlich- 
tingsboekjes toch wel wat 
goedkoper. 

Nu rijst de vraag of de compu¬ 
ter als sexuele voorlichter zal 
aanslaan. Een duidelijk voor¬ 
deel is dat de huiscomputer 
volledig neutraal alle info geeft 
en vragen beantwoordt. Daar¬ 
mee wordt de vragendrempel, 
die menigeen het schaamrood 
op de kaken jaagt, verlaagd. 
Aan de keerzijde van de me¬ 
daille staat het feit dat uw digi¬ 
tale rekenaar geen emoties 
kent. Begrip voor problemen 
kun je dan ook niet van de 
computer verwachten! 
Inmiddels begint in de VS het 


gebruik van electronische sex 
bulletin boards een aardig suc¬ 
ces te worden. Een firma als 
Sex-tex adverteert daar open¬ 
lijk als The National First Elec¬ 
tronic Sex Service. In de ano¬ 
nimiteit van de PC kunnen de 
gebruikers van Sex-tex eroti¬ 
sche interactieve gesprekken 
voeren en advertenties opvra¬ 
gen of zetten. Andere netwer¬ 
ken houden zich bezig met de 
homo- of lesbische scene. 
Voor de betrokken onderne¬ 
mers is het flink zakken vullen, 
want men rekent al gauw dertig 
tot zeventig gulden per uur ge¬ 
bruikerstijd. 

Gezien de resultaten van deze 
sex bulletin boards maakt 
sexuele voorlichting per com¬ 
puter wellicht een goede kans. 
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Member of Terminal Mart International 


Energiestraat 29 - 1411 AR Naarden 
Tel. 02159-46814 


TM Data doet u een fantastisch aanbod ! 

Bij aankoop van 5 doosjes van 10 stuks Nashua Diskettes 
type MD-1D (andere kombinaties zijn ook mogelijk) 
ontvangt u geheel gratis een prachtig Nashua dartsspel. 

Ga zo snel mogelijk naar uw dealer en u krijgt direkt bij 
aankoop uw dartsspel mee naar huis. Dus geen zegeltjes, 

, coupons, rebussen of anderszins, maar boter bij de vis. 

Als dat geen aanbod is... Maar haast u, want op is op ! 



DATA ZUID 





























Vragen 


van Gebruikers. 



Ook nu weer gaat Jan Bodzinga in 
op de problemen van onze lezers. 
Zijn rubriek blijkt zeer populair ; maar 
laat u dat niet weerhouden uw 
vragen of opmerkingen in te sturen. 
Ook tips en handigheidjes zijn 
welkom.. 


Tape voor huisgebruik 

Uit Almere komt een noodkreet over 
het programma ’HuisgebruikFred 
Langereis heeft ons hierover al een 
paar keer benaderd. Zijn probleem is, 
dat hij heeft geprobeerd dit programma 
voor tape-gebruik geschikt te maken. 
Maar hij komt er niet helemaal uit. 



Het is helaas niet altijd mogelijk, om een 
stuk software, dat voor diskette-gebruik is 
geschreven te vertalen naar tape. In het 
geval van huisgebruik kan het echter wel. 
We hebben al eens eerder uitvoerig hiero¬ 
ver geschreven, maar voor hen die dat niet 
hebben gelezen nogmaals de hoofdzaken: 
Het device-nummer van de diskdrive is 8. 
De cassetterecorder heeft als devicenr. 
een 1. Alle OPEN-opdrachten moeten dan 
ook worden aangepast, door de 8 te ver¬ 
vangen door 1. Dus b.v. 
OPEN2,8,2,”NAAM,S,R” wordt: OPEN 
2,1,0,”NAAM,S,R”. Denk er hierbij ook om, 
dat het derde getal, dat is het secondary 
address bij tape nooit anders mag zijn dan 
0 voor inlezen en een 1 of 2 voor het 
wegschrijven. Dus bij het aanpassen kij¬ 
ken wat er met het bestand gebeurt, en 

dienovereenkomstig het derde cijfer zet¬ 
ten. De rest van de software hoeft dan 
(meestal) niet te worden veranderd. Ook 
het lezen van de handleiding van je Com- 
modore-recorder kan je een heel eind op 
weg helpen. 

Een ander ding, waar je om moet denken is 
het Drive-commando- en fout-kanaal dat 
een file-nummer heeft van 15. Deze test op 
lees- en schrijffouten komt niet voor bij de 
tape. Daarom kun je zonder meer alle 
handelingen, zoals OPEN15, PRINT#15 
en INPUT#15, die in het programma staan, 
verwijderen. Je zult daarna zelf de soft¬ 
ware opnieuw moeten testen. 

Zodra er sprake is van USR- of REL- 


bestanden op de disk, moet je het aanpas- 
sen naar tape maar vergeten, want in die 
gevallen is het nodig de hele programma¬ 
structuur aan te passen. 

Doodle _ 

| Andre Albert uit Tongeren kan niets 
beginnen met z’n tekenprogramma 
Doodle terwijl hij beschikt over de stan¬ 
daard C-64 uitrusting. (C-64/1541/ 
MPS 802). 


Wie helpt Andre uit de droom door een tip 
te geven, zodat dit kan gaan werken. An¬ 
dre Albert, Wirixstraat 1 B3700 Tongeren, 
Belgie 

Snellader C-16 

Verschillende lezers vroegen ons om een 
snellaadprogramma voor de C-16, wie 
heeft of kent zoiets? 

Koppeling 

E.H. Bakker uit Vaasen heeft sinds de 
komst van de 128 de nodige hardware 
in huis. Hij wil alle machines graag op 
elkaar laten werken, en vraagt ons hoe 
dat het beste kan gebeuren. 


Het is helaas een hopeloze zaak om zowel 
de C-64 als de C- 128 tegelijkertijd op 
meerdere disk-drives met hetzelfde devi¬ 
ce-nummer te laten werken. Natuurlijk is 
het mogelijk, om één van de beide drives 
een ander nummer te geven. Voor de 1541 
betekent dit een paar regels Basic, waar¬ 
mee die problemen uit de wereld zijn. 
Daardoor kun je zelfs meer dan twee dri¬ 
ves aansluiten op een computer. Voor het 
veranderen van de 1541-drive kun je het 
volgende programma gebruiken: 

10 REM DEVICE-VERANDEREN 
20 REM VOOR CBM - 1541 DRIVE 
30 INPUT ” OUD DEVICENR, DO 
40 INPUT ” NIEUW DEVICENR. DN 

50 OPEN 15,DO,15 

51 REM COMMANDO-KANAAL 

60 PRINT#15,”M-W”;CHR$(119);CHR$ 
(0);CHR$(2);CHR$(32+DN);CHR$(64+D 
N) 

70 CLOSE 15 

Om van de 1570 en 1571 het device- 
nummer te veranderen moet het volgende 
stukje Basic worden ingetypt: 

10 REM DEVICE-VERANDEREN 
20 REM VOOR CBM - 1570/1571 DRIVE 
30 INPUT ” OUD DEVICENR. :",DO 
40 INPUT ” NIEUW DEVICENR. :”,DN 
50 OPEN 15, DO , 15 


60 PRINT#15, ”U0>”;CHR$(DN) 

70 CLOSE 15 

Om met twee computers, die beide via de 
seriële bus contact hebben met een device 
4/5 printer te kunnen werken, moet je er op 
z’n minst voor zorgen, dat er in geen geval 
gelijktijdig een PRINT-opdracht vanuit bei¬ 
de machines naar toe wordt gestuurd. 

Save en replace 

De keren dat we worden geconfron¬ 
teerd met lezers, die teleurgesteld mel¬ 
den dat door het saven met de find en 
replace- optie, het aapje commando, 
alle bestanden van de betreffende disk 
zijn veranderd in een complete chaos. 
Zeker omdat de fout in de meeste 
gevallen niet direkt is onderkend. Wat 
valt hieraan te doen. 


In de officiële Disk-drive handleiding van 
Commodore vind je bij de beschrijving van 
het commando SAVE de mogelijkheid om 
een programma op de disk te overschrij¬ 
ven met een nieuw programma met dezelf¬ 
de naam. Dit commando luidt als volgt: 
SAVE ”@0:PRGNAAM”,8 
Een prachtig hulpmiddel zou je denken, 
om een gewijzigd programma weer terug 
te zetten op dezelfde plek op disk en 
directory. Helaas blijkt dit in de praktijk te 
leiden tot een forse serie foute bestanden. 
Waar het precies aan ligt is niemand duide¬ 
lijk, zeker is wel dat het veel beter is om 
deze optie nooit te gebruiken met de C-64 
of Cl 28. Het blijkt namelijk dat, wil deze 
SAVE & REPLACE optie goed lopen er 
minstens tweemaal zoveel vrije ruimte op 
de disk aanwezig moet zijn als het te saven 
programma groot is. Daarom een goede 
raad, gebruik deze optie nooit meer, maar 
save eerst zelf het gewijzigde programma 
onder een andere naam, verwijder dan het 
oude programma en RENAME het nieuwe 
bestand met de oude naam. 

Zo’n cyclus zou er ongeveer zo uit kunnen 
zien: 

SAVE "NIEUW",8 

(Save nieuwe programma) 

OPEN 15,8,15 
PRINT#15,"SO:OUD" 

(Verwijder oude prog.) 
PRINT#15,”RO:OUD = NIEUW” 

(Geef nieuwe prog. oude naam) 

CLOSE 15 

Deze manier van wegschrijven is wel wat 
bewerkelijker dan de Commodore-optie, 
maar veel veiliger, als je tenminste ook 
rekening houdt met de LED van de drive, 
om te zien of er hardware- of syntaxfouten 
ontstaan. 
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Intikfouten 


Naarmate de listings ingewikkelder 
worden, blijken er ook meer mensen 
moeilijkheden te ondervinden bij het 
intypen. Ook de listings uit het groot 
listingboek blijken soms nog wel voor 
wat problemen te zorgen. Zo heeft Ru - 
dy Pauwels problemen met bepaalde 
tekens in een printopdracht ( Woestijn- 
race) 


In de verschillende Basic-listings vind je zo 
nu en dan tekens die op het eerste gezicht 
wellicht wat vreemd overkomen. Zo staat 
er in het prachtige programma Woestijnra- 
ce bijvoorbeeld een opdracht die lijkt op : 
PRINT ” { 6 x SPATIE } {links} {INSert}”.. 
Om de listing (waar overigens geen fouten 
in zitten) goed in de computer te kunnen 
intikken moet je alle tussen spekhaken 
vermelde tekens op dezelfde manier inty¬ 
pen als vermeld. Dit geldt ook voor de INS 
toets in dit geval. Denk er daarbij wel om, 
dat je niet letterlijk de haken en de tekst 
overneemt, dus geen 6 x SPATIE intypt, 
maar daarvoor 6 keer op de spatiebalk 
drukt. Om dit alles goed over te nemen, 
moet je ervoor zorgen, dat een soortgelijke 
regel altijd begint met het intoetsen van het 
aanhalingsteken, (”). Gebeurt dat niet, dan 
weet de computer niet, dat je in Quote- 
mode aan het werken bent, en dat geeft 
zonder meer problemen bij toetsen als 
CURSOR-UP of INSERT. Een troost voor 
degenen die met dit probleem te kampen 
hebben, je bent zeker niet de enige, maar 
Basic is nu eenmaal nogal kritisch waar het 
z’n syntax. betreft. 

VIC 20 programma’s 


Van allerlei kanten wordt de redactie 
benaderd over het ontbreken van leuke 
en moderne software voor de VIC-20. 
Zo ook de noodkreet van W.S.A. van 
Dommelen uit Zutphen. Hij is al maan¬ 
den op zoek naar software voor de VIC- 
20, maar waar hij het ook probeert, 
overal krijgt hij nul op z’n rekest. Hij 
schrijft, het lijkt wel of deze software 
gewoonweg niet meer bestaat. 


Helaas moeten wij ook constateren dat er 
nog maar heel weinig actieve VIC-20 bezit¬ 
ters bestaan in Nederland. Een paar maan¬ 
den geleden zijn bij ons de laatste Basic 
listings speciaal voor de VIC binnengeko¬ 
men, en daarvan waren er maar een paar 
geschikt voor publicatie. We kunnen dus 
weinig anders dan de VIC een beetje ver¬ 
geten, hoe jammer dat ook is, want de VIC 
is toch wel de pionier op het gebied van de 
huiscomputer geweest. Maar in de tijd die 
er inmiddels verstreken is, is deze trend¬ 
setter vervangen door modernere en bete¬ 
re apparaten, waardoor de gebruikers van 


het eerste uur in de kou komen te staan. 
Wat ons betreft, wij zullen nog wel even 
doorgaan met het afdrukken van program¬ 
ma’s voor de VIC, zolang ze maar worden 
ingestuurd. Verder kan het geen kwaad, 
om eens te informeren naar een locale 
computerclub, waar ongetwijfeld nog wel 
een paar VICCERS zitten, zodat je samen 
misschien het één en ander aan het ont¬ 
wikkelen van VIC-software kunt doen. Op 
nieuwe (commerciële) programma’s en 
spelletjes hoef je echter voor de VIC niet 
meer te rekenen. Deze markt wordt door 
de handel niet meer interessant gevonden. 

Machinetaal 


Uit Groningen komt het verzoek van 
H.H.Eggens om wat meer te vertellen 
over Machinetaal. Hij ziet in de diverse 
programma’s zo vaak een serie DATA- 
getallen staan, die dan worden wegge- 
poked naar een RAM-adres, maar daar¬ 
na wordt voor hem het spoor onduide¬ 
lijk, want hij begrijpt niet wat er verder 
met die getallen gebeurt. 


Het voert te ver voor deze rubriek om 
uitgebreid aandacht te besteden aan het 
onderwerp wat hier aan de orde is. Toch 
wil ik het even aanstippen, om te wijzen op 
de mogelijkheden en onmogelijkheden 
van machinetaal. 

Als eerste moet je beseffen dat er een 
enorm verschil bestaat tussen program¬ 
ma’s in Basic (een hogere computertaal) 
en Assembly- of Machinetaal (een lage 
taal). Voor de eerste kun je met een paar 
commando’s een grote hoeveelheid werk 
verzetten, die bij het programmeren in 
machinetaal een paar bladzijden vol met 
opdrachten kost. Daarnaast wordt bij de 
laatste iedere onnauwkeurigheid meteen 
afgestraft doordat meestal de computer 
vastloopt. Je moet over het nodige geduld 
en doorzettingsvermogen bezitten, om 
werkelijk iets te bereiken in machinetaal. 
Het grote voordeel van machinetaal is dat 
je erg laag, dus dicht bij de microprocessor 
aan het programmeren bent. Dat betekent 
dat de software die je maakt meestal meer 
dan duizend keer sneller is, dan hetzelfde 
programma in Basic. Daarom wordt voor 
flitsende spellen en andere toepassingen 
ook meestal machinetaal gebruikt. Daar¬ 
naast kun je met machinetaal ook dingen 
doen, die in Basic beslist niet mogelijk zijn, 
zoals het aanspreken van poorten en dri- 
vers etc. Kortom, genoeg redenen om wat 
geduld bijelkaar te rapen en eraan te be¬ 
ginnen. 

De laatste tijd komt er gelukkig veel meer 
animo voor het maken van programma’s in 
6502 machinetaal. Zo is er onlangs de 
nieuwe assembler CHAMP op de markt 


gekomen, waarmee je in meer of minder 
begrijpelijke mnemonics de machinetaal 
kunt schrijven en tot binaire (echte) com¬ 
putertaal kunt vertalen. Verder beginnen 
we in Commodore-lnfo binnenkort met 
een serie artikelen voor de beginners op dit 
gebied. Ook het NTI heeft inmiddels een C- 
64 cursus Machinetaal klaar liggen, waar¬ 
bij je spelenderwijs deze taal kunt gaan 
beheersen. Mogelijkheden te over om 
eens een gooi te doen naar het innerlijk van 
je machine. 

Compiler C-128 


Dat het wel goed gaat met de verkoop 
van de nieuwe 128 is te zien aan de 
reacties die we inmiddels krijgen van 
de eerste gebruikers van deze machi¬ 
ne. Gerrit Jan van Schaijk uit Coevor - 
den wil graag weten of het niet nog 
sneller kan op de 128. Bestaat er nog 
geen Basic-compiler voor, vraagt hij. 


Gerrit Jan, ik kan je melden dat er inder¬ 
daad een compiler op de markt is ge¬ 
bracht, die bestemd is voor de Basic- 
programma’s van de C-128. Nu betekent 
dit natuurlijk niet meteen, dat het ook een 
goede compiler is, maar hij bestaat. Het 
Compiler heet Austro Comp 128 en wordt 
geleverd door Datahome uit Amsterdam. 
Hij is volledig compatibel met de Basic 7.0 
waardoor alle nieuwe Basic-opdrachten 
netjes worden bewerkt. Ook user- uitbrei¬ 
dingen in de vorm van wedges e.d. worden 
verwerkt. Het compileren is heel erg sim¬ 
pel en volgens de handleiding erg doeltref¬ 
fend. Binnenkort zullen we onze bevindin¬ 
gen met dit software hulpmiddel uitvoerig 
publiceren. Inlichtingen over dit zo’n 300 
gulden kostende pakket zijn te krijgen bij 
Datahome, 2e Helmersstraat 5 Amster¬ 
dam (020-837367). 

Jan Bodzinga. $ 


Abonnementen 


info 


Bij fouten in de adressering etc. kunt 
dat meestal het gemakkelijkst oplos¬ 
sen door op de girokaart gewoon het 
adres te veranderen, dan komt het 
vanzelf door in onze administratie. 
Informatie over uw abonnement 
kunt u krijgen via nr. 020-273198, 
maar dan allleen op DINSDAG van 10 
tot 2 uur. Liefst niet op andere dagen, 
daar u dan onze redactie en 
commerciële afdeling daarmee be¬ 
last, die u meestal niet kunnen 
helpen. 
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Staat uw computer nog in een warwinkel van kabels op een wiebelig bureautje? 
Daarmee worden uw machine, gezondheid en het oog geen recht gedaan. Een modern 
computermeubel creëert een overzichtelijke, lichamelijk weinig belastende en solide 


werkomgeving. 

Computer- 

Meubilair 

Een vertrouwde 
steun en 

comfortabele werktafel 



E en volledig opgetuigde huiscom- 
puter neemt al gauw flink wat 
ruimte in. De computer zelf, tape¬ 
recorders, diskdrives, printers en 
niet te vergeten al die verbin- 
dingskabeltje maken van een gewoon 
bureautje een ongemakkelijk en slordig 
apparatuurpakhuis. Met name het be¬ 
dieningsgemak leidt daar sterk onder. 
De randapparatuur is op een volle werk¬ 
tafel moeilijk toegankelijk. Het wisselen 
van een diskette kost bijvoorbeeld flink 
wat handruimte en het is moeilijk ma- 
nouvreren op een klein oppervlak. Com- 
putermeubels bieden daarentegen vol¬ 
doende werkruimte voor een overzich¬ 
telijke en gebruiksvriendelijke opstel¬ 
ling. 

Zichtbare kabeltjes tonen niet alleen slor¬ 
dig. Zij zijn ook lastig, vingers blijven ha¬ 
ken, en gevaarlijk bij het per ongeluk los 
trekken! Alles met elastiekjes bij elkaar 
binden vormt daarbij slechts een noodop¬ 
lossing. Een computermeubel werkt de 
verbindingskabeltjes keurig weg en som¬ 
mige modellen bieden daartoe zelfs eigen 
kontaktdozen. 

Een slechte opstelling van het electronisch 
machinepark leidt tot lichamelijk ongemak 
van de computeraar. In een verwrongen 
houding achter de computer of monitor 
zitten of zich in alle mogelijke bochten 
moeten draaien om de randapparatuur te 
bedienen, leidt snel tot vermoeidheids- 
klachten. En een wiebelend tafeltje geeft 
het gevoel van permanente onveiligheid. 


Een goed computerbureau is ergonome- 
trisch ontworpen en staat als een rots. Dus 
geen oncomfortabele werkhouding of on¬ 
zekerheid meer. 

Als laatste voordeel van computermeubi- 
lair de afscherming. Stalen frames of bu¬ 
reaus elimineren de stoorsignalen van de 
apparatuur onderling en naar buiten. Er 
dreigen zo minder Load Errors en beïn¬ 
vloeding van andere electronische appa¬ 
ratuur, zoals bijvoorbeeld de huiskamer 
HiFi-installatie. Wellicht beschermt een 
stalen meubel ons ook nog tegen schade¬ 
lijke TV-straling, waar overigens niet veel 
over bekend is. Pas echter op bij stalen 
meubelen, de statische electriciteit kan 
de computer behoorlijk parten spelen, dus 
soms is aarding nodig. 



De verschillende 
meubelsoorten. 

Zo langzamerhand begint zich een kleine 
industrie rond het fenomeen computer- 
meubels te ontwikkelen. Niet alleen in kan¬ 
toormeubelen gespecialiseerde bedrijfjes, 
maar ook de grotere meubelieveranciers 
hebben het computermeubel op hun re¬ 
pertoire staan. Modellen zijn er te kust en 
te keur. Arbitrair maken wij hier het volgen¬ 
de onderscheid: 

0 Computerframes. 

0 Computerbureau’s en -meubels. 

_ Alternatieve mogelijkheden, hieronder 

vallen meubels die niet primair als compu- 
terrneubilair ontworpen zijn. 

Computerframes 

Computerframes zijn een soort stalen mi- 
nimeubelen waarin de computer en (een 
deel van de) randapparatuur op een bu¬ 
reau geplaatst worden. De klassieke op¬ 
stelling is de monitor bovenop en de com¬ 
puter op de uitstekende grondplaat. Duur¬ 
dere modellen bieden tussen monitor en 
computer nog een extra plank waarop 
bijvoorbeeld twee diskdrives passen. 

Zo’n computerframe geeft de werkopstel- 
ling een professioneel aanzicht, verhoogt 
het bedieningsgemak werkt de kabeltjes 
uit het gezicht en schermt stoorsignalen 
af. Ook wordt aanzienlijk op de in beslag 
genomen bureauruimte bespaard daar al¬ 
les als een soort HiFi-torentje boven elkaar 
staat. Echt grote randapparatuur zoals een 
printer kunt u meestal niet in een compu- 
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terframe kwijt. Daarvoor zal een andere 
oplossing gevonden moeten worden. Bij 
gebruik als werkstation met netwerkaan¬ 
sluiting van randapparatuur vervalt dit be¬ 
zwaar. Computerframes zijn daarom po¬ 
pulair op scholen en kantoren. 

Een bekende leverancier van computerfra¬ 
mes is de firma MARVELD uit Malden. Zij 
levert ondermeer frames voor populaire 
huiscomputers. Type A is de klassieke 
netwerkuitvoering van monitor- en compu- 
tertableau. Type B biedt een extra blad 
voor twee drives. 

Hoewel deze frames in principe voor Com¬ 
modore- en MSX-machines ontworpen 
zijn, passen er ook andere typen in. In dat 
geval de desbetreffende maten even met 
de leverancier (© 080- 583522) opnemen. 
De prijs van het populaire model B be¬ 
draagt ƒ169,-. 

Een beetje vreemde eend in de computer- 
framebijt zijn de zwaaiarmen of over bu- 
reaurails rijdende opstellingen. Dergelijke 
constructies zijn gemakkelijk om de op het 
moment niet nodige randapparatuur, even 
uit de werkomgeving te zwaaien/rijden of 
een monitor naar eigen smaak te richten. 
Helaas zijn deze bijzondere frames aan de 
prijzige kant en zult u hen dientengevolge 
voornamelijk in kantoren aantreffen. We 
hebben er nu wat gezien in de prijsklasse 
rond de 300 gulden, en misschien wordt 
ook dit een massaproduct. Er is wel een 
stevig bureau voor nodig en liefst een 
steun van de zwaaiarm tot op de grond. 
Verder levert Projecta te Weert nog een 
apart monitorframe en zijn er veel monitor- 
standaards en voetjes op de markt, oa. van 
Philips. 

Computerbureau’s en 
-meubels 

Het verschil tussen computerbureau’s en 
meubels is, dat men bij een echt bureau 
van een potenconstructie met werkblad en 
bij een meubel van een kastbouw met 
(uitschuifbaar) werkblad uitgaat. Een com- 
puterbureau is meer open dan een meu¬ 
bel. Een eenvoudig bureau kent naast het 
werkblad meestal een daarboven gemon¬ 
teerd extra blad voor de randapperatuur. 
Luxere bureaus beschikken over meerde¬ 
re bergbladen gerangschikt om een cen¬ 
traal werkblad. Bovenop staat net als bij 
het eenvoudiger model de monitor. Onder 
het werkblad de taperecorder of diskdrive 
en printer. 

Een goed computerbureau biedt de ge¬ 
bruiker veel werk- en beenruimte, terwijl 
een stalen werkblad storingen- en TV- 
straling absorbeert. Bij sommige bureau’s 
blijven de kabeltjes storend zichtbaar. An¬ 
dere bureau’s hebben nette kabelgoten. 
Voor computerbureau’s kunt u ondermeer 
eens bij de dealers van Projecta of Marveld 
en Sanders Meubelstad/Wehkamp rond¬ 


kijken. Projecta en Marveld bieden beiden 
metalen framebureau’s met twee of meer 
bladen. Op deze bureau’s kunt u een com¬ 
plete huiscomputeroutfit, inclusief meer¬ 
dere drives en printer, met gemak kwijt. 
Solide, overzichtelijke en lekker werkende 
constructies. Vooral bij Projecta is er voor 
elk wat wils. Zware-, lichte-, verrijdbare 
modellen en diverse leverbare maten. Op¬ 
tioneel zijn monitorranden, extra kontakt- 
dozen en papier- en printerbladen. De 
bureauprijzen variëren al naar gelang de 
breedte en het aantal bladen van twee- tot 
zeshonderd gulden. Ook Sanders/Weh- 



kamp heeft voor rond de ƒ 250,- compu¬ 
terbureau’s in haar gids staan. Het betreft 
volledig houten bouwpakketten met een 
uitschuifbaar werkblad en opberglade. 

De meeste computermeubels lijken op een 
grote Hifitoren. Het bedieningsgemak 
heeft daarbij licht onder de ruimtebespa- 
rende vormgeving moeten leiden. Welis¬ 
waar is er een uitschuifbaar werkblad en 
staat de monitor comfortabel op ooghoog¬ 
te. Het kleine werkblad laat echter weinig 
armslag en beenruimte over. Zo’n verrijd¬ 
bare toren met uitschuifbaar werkblad en 
drie opbergruimten kost u in witte uitvoe¬ 
ring bij Sanders/Wehkamp ƒ 179,-. Een bij 
het klassieke interieur passende houten 
uitvoering komt op ƒ 349,-. 

Echte meubels bieden de apparatuur door 
hun dichte constructie meer bescherming 
dan de open bureau’s. Ook laten de ver- 
bindingssnoertjes zich beter wegwerken. 
Van zowel bureau’s als meubels zijn rijden¬ 
de uitvoeringen te koop. Handig voor op 
kantoor en als u het meubel in de woonka¬ 
mer tijdelijk uit de weg wilt hebben. Pas er 
echter voor op dat uw computeruitrusting 
niet per ongeluk kan wegrijden. 


Alternatieve meubels 

Wie goed in de meubelshowrooms rond¬ 
kijkt, ziet daar TV-, Hifi/audio- en video- 
meubels, die eventueel als computermeu- 
bel bruikbaar zijn. Soms zijn dat vrij goed¬ 
kope dingen, er zijn nu eenmaal meer TV’s 
dan computers en de aantallen-zijn dan 
ook groter. Bij Blokker, Ikea en de Kwan- 
tumhallen zult u bijvoorbeeld vrij goedko¬ 
pe lage printertafels kunnen aantreffen, 
maar die heten dan wel audiowagen of iets 
dergelijks. Natuurlijk zijn dergelijke meu¬ 
bels niet primair voor de huisvesting van 
computers en hun randapparatuur ont¬ 
worpen. Behalve de daaruit voortvloeien¬ 
de nadelen, zoals het ontbreken van een 
groot werkblad en beenruimte, biedt zo’n 
alternatief meubel ook enkele onverwach¬ 
te voordelen. 

Zo blijkt de ruimte dikwijls aanzienlijk gro¬ 
ter dan bij een echt computerbureau of 
-meubel. Behalve de computer zelve en de 
bijbehorende randapparatuur kunt u er 
ook nog alle cassettes, diskettes, joy¬ 
sticks, inktlinten en de voorraad printerpa- 
pier in kwijt. Een ander voordeel is de 
betere stofdichtheid. Deze aartsvijand van 
computers en printers wordt door de drie 
afgesloten zijden en de vaak aanwezige 
glazen audiodeurtjes mooi buiten de 
kwetsbare onderdelen gehouden. Ook 
past de vormgeving van audio- of video/ 
TV-meubels soms beter bij het eigen inte¬ 
rieur. 

Audio-, TV- of videomeubels zijn relatief 
goedkoop en ideaal als uitbreiding op een 
reeds bestaand (te klein) bureau. Vaak 
kunt u hen makkelijk als bijzetmeubel in de 
hoek of de tegen de muur naast het bureau 
plaatsen. Eventueel laat de oorspronkelij¬ 
ke functie zich zelfs met de nieuwe compu- 
tertaak combineren. 


Een computermeubel is eigenlijk on¬ 
misbaar als u veel achter de machine 
zit Het beschermt uw apparatuur, 
voorkomt onnodige vermoeidheids- 
klachten en toont nog professioneel 
ook. Modellen zijn er te kust en te keur. 
Mocht u geen geschikt meubel vinden, 
overweg dan eens zelfbouw op maat. 
Grotere doe het zelf-zaken beschikken 
over een ruime keuze in metalen frames 
en meubelplanken waarmee men in 
een middagje een geschikt meubel in 
elkaar schroeft. Let op uitbreidingen 
met printerstandaards, eventuele ka¬ 
belmogelijkheden en wanneer u later 
zo’n zwenkarm voor de monitor wilt 
monteren, moet de zaak stevig genoeg 
zijn. 
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”No Load error 

De C-64 als Meetinstrument 


Door E.H.B. Handelsonderneming is on¬ 
langs een kleine module op de markt 
gebracht, die vergezeld wordt van on¬ 
betwist enthousiaste verhalen van de 
ontwerpers. Het gaat om een kunstof 
blokje met de naam No Load Error. DE 
hardware oplossing voor cassette-pro- 
blemen? 



Dit blokje dient in de Datasetter-recorder 
te worden gemonteerd, waardoor via de 
op het moduul aanwezige LED-indicator 
tijdens het laden wordt aangegeven bij 
welke kopstand van de cassetterecorder 
de beste weergave te verkrijgen is. Vol¬ 
gens E.H.B. zijn er nogal wat problemen 
met het laden van programmatuur die 
weggezet is met hulp van een andere 
recorder. De kopstand is meestal de 
boosdoener. Door de afwijkende kop¬ 
stand blijken dan de data niet zonder meer 
weer in de Commodore te lezen. Met hulp 
van dit nieuwe stukje knutselwerk, kan 
tijdens het lopen van de tape de kop 
optimaal worden ingesteld, waarna zonder 
problemen de data kan worden overge¬ 
seind. Een leuk gat in de markt, want 
E.H.B. heeft inmiddels bijna 1000 van deze 
dingetjes verkocht. 

De montage van de NO-LOAD moet door 
de gebruiker zelf worden gedaan. Hiervoor 
is het noodzakelijk de recorder te ontman¬ 
telen en een paar (kleine) gaatjes in de kast 
te boren. De Nederlandse tekst wijst hierbij 
beknopt de weg. De instructie gaan verge¬ 
zeld van een paar (Engelse) schemaatjes, 
waarbij het de electronisch wat beter ont¬ 
wikkelde computeraar direkt duidelijk zal 
worden waar de verschillende draadjes 
aan vast moeten worden gesoldeerd. 

Al met al nogal wat werk, waarbij je moet 
bedenken, dat deze hele handel niet nodig 
was geweest, als we allemaal weer gingen 
werken met de standaard-instelling van de 
geluidskop van de recorder. Als niemand 
ooit aan dat ding had gedraaid, hoefden 
we nu niet met z’n allen een run te onder¬ 
nemen op dit soort hulpmiddelen. 

Het geheel werkt redelijk, kost 69 gulden 
en wordt geleverd door E.H.B. Schubert- 


laan 16, 4904 MK Oosterhout, tel. (01620) 
54798. 

Basic Compiler C-128 

Zoals wel te verwachten was, is, naast de 
nieuwe Superbase en Superscript, één van 
de eerste beschikbare programma’s voor 
de C-128 een Basic Compiler. De firma 
Datahome uit Amsterdam levert sinds be¬ 
gin dit jaar de AUSTRO-COMP - 128. 

Een compiler is een handig hulpmiddel bij 
het programmeren in Basic. De functie van 
de compiler daarbij is het vertalen van de 
Basic-programma’s naar een soort code, 
die bestaat uit een gedeelte echte 6502 
machinetaal, de runtime, met daarnaast 
de min of meer vertaalde Basic-listing van 
het betreffende programma. Het grootste 
voordeel van gecompileerde programma¬ 
tuur is het feit, dat deze programma’s, die 
overigens op de normale wijze kunnen 
worden geladen en gerund, een snellere 
verwerkingstijd hebben dan de originele 
Basic-listing. Wat er normaal gebeurt na 
het ingeven van RUN is, dat de Basic- 
opdrachten stuk voor stuk worden ver¬ 
taald in de interpreter. Dat kost onevenre¬ 
dig veel tijd. De compiler daarentegen 
zorgt ervoor, dat de Basic-opdrachten al 
zijn voorbewerkt, zodat de interpreter nog 
maar weinig te doen heeft. Daardoor wordt 
bereikt, dat de op deze manier gemaakte 
software sneller kan runnen. Daarnaast is 
het een voordeel, dat de op deze manier 
veranderde Basic-programmatuur niet 
meer kan worden gelist en veranderd. 

De Austro-Comp 128 beantwoordt aan de 
voor een goede compiler geldende ken¬ 
merken. We hebben dit programma op de 
testbank gelegd, en zijn tot de conclusie 
gekomen, dat de compiler naar behoren 
werkt. We kunnen standaard Basic-pro¬ 
gramma’s, geschreven in C-128 Basic 7.0, 
zonder moeite veranderen in gecompileer¬ 
de programma’s. In werking en opzet lijkt 
de Austro Comp erg veel op de bekende 
Blitz-compiler voor de C-64, maar dat 
hoeft natuurlijk niets te betekenen. 

Er zitten pen paar kleine nadelen aan deze 
Austro Comp. Als eerste is het begeleiden¬ 
de drukwerk niet erg best uitgevoerd. Er 
staan nogal wat taalfouten in en we kun- 
. nen ons niet aan de indruk onttrekken, dat 
er hier en daar wat teveel prestaties wor¬ 
den opgelepeld, die we in de software zelf 
niet tegen kwamen. De compiler start net¬ 
jes met een menu, waarin je de gewenste 
spreektaal kunt aangeven, waarmee het 
programma verder verloopt. Jammer is 
daarbij, dat we alleen kunnen kiezen uit 


Engels, Italiaans, Frans en Duits. Dit menu 
is dus in feite voor ons, Nederlanders, wat 
overbodig. De importeur zou hier best wat 
aan kunnen doen. Gelukkig is er niet veel 
conversatie nodig, zodat ook het Engels 
wel door iedereen begrepen zal worden. 
Het compileren gaat simpel in z’n werk. In 
feite hoeft alleen maar een keuze te wor¬ 
den gemaakt tussen de beschikbare confi¬ 
guraties (single of double-drive) en het al of 
niet gebruiken van sprites met collision. 
Verder hoeft er alleen maar de filenaam te 
worden ingetoetst van het programma, dat 
bewerkt moet worden. Daarna volgt een 
lange periode van wachten, omdat het 
compileren van een groot programma 
nogal wat tijd neemt. Onderwijl komen de 
gemaakte syntax-errors netjes op het 
scherm. De compiler gaat hierna wel ver¬ 
der, zodat alle fouten in één keer uit het 
programma kunnen worden gehaald. 

Het instructieboekje bevat een keur aan 
mogelijkheden, die we niet allemaal heb¬ 
ben getest, maar in hoofdlijnen komt het 
erop neer dat, ondanks de haken en ogen, 
er een goed programma uit de compiler 
komt, mits de Basic-listing niet te veel van 
de standaard afwijkt. 

De verbetering in verwerkingstijd viel te¬ 
gen. Globaal werken de programma’s zo’n 
2 tot 3 keer sneller als ze waren gecompi¬ 
leerd. Listen was er niet meer bij, en er 
bestaat zelfs een mogelijkheid om de pro¬ 
gramma’s te voorzien van een test op het 
aanwezig zijn van een hardware-dongle in 
de userpoort, zodat ongeoorloofd gebruik 
van de gecompileerde software niet mo¬ 
gelijk is. Kopiëren is toegestaan, want de 
programma’s werken toch niet. Dat geldt 
ook voor de Austro-comp zelf. Deze runt 
uitsluitend met de meegeleverde user- 
poort-sleutel. 

Langere programma’s 
Helaas moesten we constateren, dat de 
lengte van de Basicprogramma’s nogal 
toeneemt, als er wordt gecompileerd met 
de Austro-comp. Voor kleine programma’s 
is dit normaal, 14 blocks werden 27, maar 
voor de grotere viel dit erg tegen. Een 
programma van 112 blocks werd omgeto¬ 
verd tot een lengte van 127 blokken. En dat 
kost het nodige aan vrije geheugenruimte. 
Nu is dit uiteraard sterk afhankelijk van de 
hoeveelheid tekst, die er in een listing zit. 
Aan strings valt er nu eenmaal weinig te 
compileren. 

Al met al zijn we gelukkig met het feit, dat 
de software voor de C-128 in Nederland 
een beetje van de grond komt, want daar¬ 
mee staat of valt het uiteindelijke succes 
van deze machine op de Europese markt. 
De Austro Comp is voor de liefhebbers een 
leuk hulpmiddel, en kost 299 gulden. In¬ 
lichtingen over deze software bij Dataho¬ 
me, 2e Helmersstraat 5,1054 CA Amster¬ 
dam (020) 837367 
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Print-out 


Met o.a. Drive Manager - Listing - Pakspel - 
Hokken C-16 - Ghostrunner C-16 - Pieptyp C-16 


In dit nummer komen de C-16 en Plus/4 bezitters ruimschoots 
aan bod. Ze zullen zien dat er steeds leukere en betere program¬ 
ma’s worden geplaatst. Dit is vooral te danken aan de mensen 
die de moeite nemen om hun eigen gemaakte werkstukjes aan 
ons op te sturen. 

Dit keer geen listings voor de C-128 en misschien raadt u de 
reden al, wij hebben helaas onvoldoende materiaal opgestuurd 
gekregen. Natuurlijk kunnen de 128 bezitters wel gebruik maken 
van de listings van de commodore-64, maar het zou toch wel 
leuk zijn om een aantal programma’s, die in Basic versie 7.0 
geschreven zijn, op de 128 aan het werk te zien. 

De listingservice telefoonlijn blijft elke maandag voor u open 
staan tussen 16.00 uur en 21.00 uur. Wel willen wij u vragen om 
vanaf heden hiervoor het nummer 02152-65695 te draaien. U 
kunt via dit nummer dus vragen stellen over de door ons 
geplaatste listings. Dit houdt wel in dat u buiten deze tijden 
hiervoor niet meer terecht kunt voor deze vragen. 

Rob van den Heuvel. 


Inhoud van dit listingdeel 


Checksum 

34 

Pakspel 

44 

Drive Manager 

35 

Hokken C-16 

46 

List Wash 

36 

Wijzerplaat C-16 

50 

Listing 

37 

Ghostrunner C-16 

51 

Duizenden 

38 

Pieptyp C-16 

54 

Soundmon 1.1 

39 

Ondersteboven C-16 

54 



Het overtikken van een listing kan een heel karwei zijn en als u 
een beetje normaal mens bent dan maakt u daarin beslist een 
aantal fouten. Nu is niets moeilijker om de fouten uit je eigen 
werk te halen. Al geruime tijd geleden heeft Jan Bodzinga 
hiervoor een zgn. Checksum-programma geschreven. Om de 
vele nieuwe lezers van Commodore-lnfo te helpen volgt hieron¬ 
der nog een keer een volledige uitlegh over de werking van dit 
programma, waarmee het, hoe vreemd dat misschien ook lijkt, 
echt mogelijk is om met behulp van dit programma de fouten in 
elke door ons geplaatste listing op te sporen. 

Hiervoor gaat u als volgt te werk: 

O U tikt de listing heel zorgvuldig over en SAVEt hem voordat u 
het programma RUNt op een diskette of een cassette. 

©U tikt het RUN commando in. Mocht het programma de 
boodschap ’Fout in dataregels!’ geven dan heeft u een fout 


rem XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
XX 

rem basic loader "SYNTAX.CHECKSUM" 
rem na de commando’s ’run’ en 'new’ 
rem blijft dit programma in het ge- 
rem heugen, laad het te testen pro— 
rem gramma en tik daarna sys 49152. 
rem XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
XX 

i-49152 srem beginadres 

readasifa<0then40:rem data ingeleze 


1 40 


150 


160 


170 


180 


190 


90 

95 

100 


110 


120 


130 


pokei , ai i*i+l:b«b+asgoto20 
if b< >168441henprint"CCLR-HOMElfout 
in dataregels!" :b=0send 
poke49184 , 148spake49185, 192 
i =49300 

read as ifa<0then80 
pokei, a:b = a+b: i = i-*-lïgato60 
if b<>20068thenprint"CCLR-HOMElfaut 
in dataregels! (vanaf regel 240)": 
b=0:end 

prinfdata is weggezet" 
pr int"checksum testen met sys49152" 
data 165,43,166,44,133,163,134,164, 
169, 147 

data 32,210,255,160,0,240,3,32,73, 
192 

data 32,73,192,208,1,96,32,225,255, 
208 

data 3,76,116,164,32,81,192,32,73,1 

92 


200 


210 


220 

230 

240 

250 

260 

270 


data 240,12,201,32,240,247,24,101,1 
67,133 

data 167,76,37,192,166,167,169,0,13 
2,168 

data 32,205,189,169,13,32,210,255,1 
64, 168 

data 76,17,192,200,208,2,230,164,17 
7, 163 

data 96,162,0,189,123,192,240,6,32, 
210 

data 255,232,208,245,32,73,192,170, 
32,73 

data 192,132,168,32,205,189,162,3,1 
69,32 

data 32,210,255,202,208,250,169,0,1 
33,167 

data 164,168,96,82,69,71,69,76,32,0 
data -1 

data 165,197,201,3,240,7,201,4,240 
data 6,76,148,192,76,34,192,169 
data 147,32,210,255,76,161,192 
data -1 


XXX EINDE LISTING XXX 


syntaxchecksum Iisttestprogramma 


regel 1 
regel 2 
regel 3 
regel 4 
regel 5 


249 

84 

125 

2 

246 


regel 

regel 

regel 

regel 

regel 

regel 

r eg el 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 


6 
7 
10 
20 
30 
40 
50 
55 
60 
70 
80 
90 
95 
100 
110 
120 
130 
1 40 
150 
160 
170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 


152 

249 

157 

64 

38 

57 

14 

251 

192 

42 

244 

245 
237 

183 

158 

232 

183 

96 

96 

127 

71 

223 

73 

79 

109 

106 

225 

16 

163 

92 

225 


ready. 
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bij het overtikken gemaakt. Herstel de fout en SAVE de 
verbeterde versie. Mocht het programma met de boodschap 
’data is weggezet checksum testten met sys komen dan 
is tot dusver alles goed. Het programma is nu in een stukje 
machinetaalgeheugen gezet. Als u het NEW commando 
geeft blijft het toch in de computer staan. 

Alle door ons geplaatste programma’s zijn in Basic geschreven. 
Als u een programma heeft overgetikt SAVE het eerst, mocht er 
iets mis gaan dan hoeft niet de gehele listing opnieuw te gaan 
intikken. Als u nu een programma op fouten wilt gaan controle¬ 
ren dan kunt u dat in het geheugen laden (wel eerst het 
checksumprogramma hebben gerund). Vervolgens typt u zon¬ 
der het programma te runnen de opdracht sys 49152 (C-64) of 
sys 1536 (C-16 en Plus/4) in. 

Als alles goed is gegaan loopt er nu een rij regelnummers over 
het scherm met getallen erachter. Dezelfde lijst staat ook achter 
elk door ons geplaatste programma. Wijkt nu een nummer 
achter een regelnummer af van het nummer dat in het blad staat 
dan heeft u in die regel iets anders ingetikt dan er in het blad 
stond. U kunt de stroom getallen d.m.v. de RUN/STOP toets 
pauzeren en weer vervolgen met de F1 of F7 toets. Het is 
uitermate belangrijk dat u goed met dit programma overweg 
kunt en mocht U het niet goed werkend krijgen bel dan gerust 
even met onze listingservice telefoonlijn. 
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Drive Manager 


Mocht u niet in het bezit van een uitbreidingsmodule zijn (zoals 
bijvoorbeeld de ’Power Cartridge’) dan kan dit programma u 
grote diensten bewijzen. Door middel van de funktietoetsen 
kunt u de onhandige diskopdrachten omzeilen. Als u eenmaal 
met een dergelijk programma hebt gewerkt wil u niet meer 
anders. De gebruiksaanwijzing wordt in het programma zelf 
gegeven en wel in de REM regels vanaf regel 100. 


100 

101 

102 

103 

104 

105 

106 

107 

108 
109 
1 10 
111 
1 12 
113 
1 14 
115 
1 16 
1 17 
1 18 

119 

120 
121 
122 

123 

124 

125 

126 

127 

128 

129 

130 

131 

132 

133 

134 

135 

136 

137 

138 

139 

140 

141 

142 

143 

144 

145 

146 

147 

148 

149 

150 

151 

152 

153 

154 


rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 

rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
rem 
f or 

i * 

data 

156, 

data 

002 , 

data 

245, 

data 

174, 

data 


**************************** 
* I * 

manager 


#progr amma 
*schriiver 

* 

♦datum 
♦ 

♦functie toetsen: 
♦ 

♦ 

♦ 

♦ 

♦ 

♦ 

♦ 

♦ 

♦ 

♦ 


s dr i ve 
s w. kok 
r oz enburg 
a 30-1-1986 


f 1 

SS 

directory scan 

f2 

SS 

f or mat/n ew 

f3 

SS 

error status 

f 4 

BS 

renaiile 

f5 

SS 

initialize 

f6 

SS 

scr atch 

f7 

BS 

validate 

f8 

BS 

reset (alles) 


♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 
♦ 

n a ♦ 
♦ 
♦ 


♦ opties : 

♦ 

♦fout controle voor en 
♦ieder disk commando. 

♦ 

♦directory scan over-# 

♦schrijft niet het bestaan—♦ 

♦de programma in geheugen. ♦ 

♦ * 

♦op ieder ingrijpend com-# 
♦mando wordt een tweede# 
♦bevestiging verlangd. <y) * 

♦ * 
♦beperking: * 

♦ * 
♦functie toets werkt alleen# 
♦als links van de cursor# 
♦geen tekst e.d. staat. * 

♦ * 

♦ aanduidingen s # 

♦ * 

♦ i s= i n i t i a 1 i z e v = val idate# 

♦n$ s naam sn$=scratch file* 
*nn$ & on$ nieuwe %/. oude n$* 

* * . 

♦opmerking: * 

* * 

♦na een reset het prg ini-* 

♦tialiseren met sys 40000 * 

* * 

**************************** 

i = 39991 to 40959 :read b :pok 
b :next i :sys 40000 
169,055,133,051,133,055,169, 
096,032,055,156,133,052 
133,056,234,169,083,141,143, 
169,156,141,144,002,096 

164,203,196,197,240,010,177, 

201,137,176,004,201,133 
176,003,076,072,235, 132, 197, 
141,002,240,018,224,001 
208,242,201,133,240,029,201, 


134,240,035,201,135,240,041 

155 data 208,049,201,133,240,010,201, 
134,240,016,201,135,240,022 

156 data 208,030,162,000,076,178,156, 
162,005,076,178,156,162,010 

157 data 076,178,156,162,015,076,178, 
156,162,020,076,178,156,162 

158 data 025,076, 178, 156, 162,030,076, 
178,156,162,035,169,083,141 

159 data 119,002,169,089,141,120,002, 
169,083,141,121,002,160,000 

160 data 189,226,156,153,122,002,200, 
232,192,005,208,244,169,058 

161 data 141,127,002,169,013,141,128, 
002,169,010,133,198,162,255 

162 data 076,038,235,052,048,050,048, 
050,052,048,052,051,050,052 

163 data 048,051,050,048,052,048,053, 
057,055,052,048,051,054,051 

164 data 052,048,054,055,050,052,048, 
051,056,051,052,048,055,050 

165 data 056,032,240,159,032,057,159, 
032,100,159,201,048,240,001 

166 data 096,169,036,133,002,169,001, 
162,002,160,000,032,189,255 

167 data 162,008,032,186,255,032,192, 
255,162,001,032,198,255,160 

168 data 006,032,165,255,136,208,250, 
032,165,255,240,006,032,210 

169 data 255,024,144,245,169,013,032, 
210,255,160,002,032,165,255 

170 data 208,010,032,074,159,032,204, 
255,032,100,159,096,136,208 

171 data 238,032,165,255,170,032,165, 
255,032,205,189,169,032,032 

172 data 210,255,032,165,255,240,006, 
032,210,255,024,144,245,165 

173 data 145,201,127,208,199,240,209, 
032,240,159,032,074,159,169 

174 data 000,032,080,159,162,001,032, 
198,255,032,165,255,201,032 

175 data 240,249,032,210,255,032,165, 
255,201,013,208,246,032,210 

176 data 255,032,074,159,032,204,255, 
096,032,240,159,169,073,032 

177 data 210,255,169,013,032,210,255 
032,057,159,032,100,159,096 

178 data 032,240,159,169,086,032,210 
2^55, 165,013,032,210,255,032 

179 data 134,159,201,000,240,001,096 
032,057,159,032,100,159,201 

180 data 048,240,001,096,169,086,141 
060,003,169,001,032,080,159 

181 data 032,074,159,032,100,159,096 
032,240,159,032,057,159,032 

182 data 100,159,201,048,240,001,096 
162,000,169,0 78,157,060,003 

183 data 232,169,058,157,060,003,232 
134,002,032,180,159,169,013 

184 data 032,210,255,169,073,032,210 
255,169,068,032,210,255,169 

185 data 032,032,210,255,169,044,166 
002,157,060,003,032,228,255 

186 data 240,251,201,145,240,247,201 
017,240,243,201,020,240,239 

187 data 201,029,240,235,201,013,240 
057,201,157,240,227,032,210 

188 data 255,230,002,166,002,157,060 
003,230,002,032,228,255,240 

189 data 251,201,O20,240,247,201,O 13 
240,243,201,157,240,239,201 

190 data 145,240,235,201,017,240,231 
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UTILITIES 2 


201,029,240.227,032,210,255 

191 data 166,002,157,060,003,230,002, 
169,013,032,210,255,032,134 

192 data 159,201,000,240,001,096,165, 
002,032,080,159,032,074,159 

193 data 032,100,159,096,032,240,159, 
032,057,159,032,100,159,201 

194 data 048,240,001,096,169,082,162, 
000,157,060,003,232,169,058 

195 data 157,060,003,232,134,002,169, 
078,032,210,255,032,180,159 

196 data 169,061,166,002,157,060,003, 
230,002,169,079,032,210,255 

197 data 032,180,159,032,134,159,201, 
000,240,001,096,165,002,032 

198 data 080,159,032,074,159,032,100, 
159,096,032,240,159,032,057 

199 data 159,032,100,159,201,048,240, 
001,096,169,083,162,000,032 

200 data 210,255,157,060,003,232,169, 
058,157,060,003,232,134,002 

201 data 032,180,159,032,134,159,201, 
000,240,001,096,165,002,032 

202 data 080,159,032,074,159,032,100, 
159,096,032,240,159,162,000 

203 data 189,051,159,032,210,255,232, 
224,006,208,245,032,134,159 

204 data 201,000,240,001,096,076,226, 
252,082,069,083,069,084,032 

205 data 032,074,159,169,073,141,060, 
003,169,001,032,080,159,032 

206 data 074,159,096,169,001,032,195, 
255,096,162,060,160,003,032 

207 data 189,255,169,001,162,008,160, 
015,032,186,255,032,192,255 

208 data 096,169,000,032,080,159,162, 
001,032,198,255,032,165,255 

209 data 20 1,032,240,249-, 20 1,048, 208 , 
009,032,074,159,032,204,255 

210 data 169,048,096,032,151,157,096, 
162,000,189,173,159,032,210 

211 data 255,232,224,007,208,245,032, 
228,255,240,251,032,210,255 

212 data 201,089,240,006,169,013,032, 
210,255,096,169,013,032,210 

213 data 255,169,000,096,013,083,085, 
082,069,063,032,169,078,032 

214 data 210,255,169,036,032,210,255, 
169,032,032,210,255,032,228 

215 data 255,240,251,201,145,240,247, 
201,017,240,243,201,020,240 

216 data 239,201,157,240,235,201,029, 
240,231,201,013,240,012,032 

217 data 210,255,166,002,157,060,003, 
230,002,208,215,032,210,255 

218 data 096,169,020,162,040,032,210, 
255,202,208,250,169,013,032 

219 data 210,255,096 


*** EINDE LISTING #* * 


regel 110 
regel 111 
regel 112 
regel 113 
regel 114 
regel 115 
regel 116 
regel 117 
regel 118 
regel 119 
regel 120 
regel 121 


Het programma List wash van Ben Hermans uit Antwerpen is 
een kleine machinetaalversie van het Visilist programma. Alvo¬ 
rens het te RUNnen moet u wel even de volgende opdracht in de 
’direct mode’ intikken: POKE 56,15:CLR Na het runnen zult u 
merken dat u bij een list opdracht geen besturingstekens zoals 
het inverse hartje tegenkomt, maar een omschrijving van het 

teken. Een handige aanwinst voor iedereen die veel met listings 
werkt. 




1 rem list wash 

2 rem door ben Hermans 

3 rem uit antwerpen 






122 

7 

82 

141 

164 

231 

227 

227 

24 1 

227 

239 

243 


drive manager 


regel 100 
regel 101 
regel 102 
regel 103 
regel 104 
regel 105 

regel 106 
regel 107 
regel 108 
regel 109 


39 
227 
56 
55 
161 
94 
227 
77 
227 
1 13 


r eg 

155 

245 

r eg 

156 

31 

re g 

157 

61 

r e g 

158 

54 

r eg 

159 

6 

r eg 

160 

34 

r eg 

161 

2 3 

r eg 

162 

2 2 

reg 

163 

27 

r eg 

164 

22 

reg 

165 

15 

reg 

1 66 

22 

reg 

167 

33 

reg 

168 

14 

reg 

169 

19 

reg 

170 

24 

reg 

171 

38 

reg 

172 

17 

reg 

173 

45 

reg 

174 

13 

reg 

175 

10 

reg 

176 

41 

reg 

177 

26 

reg 

178 

20 

reg 

179 

7 

reg 

180 

27 

reg 

181 

33 

reg 

182 

1 8 

reg 

183 

27 

reg 

184 

35 

reg 

185 

18 

reg 

186 

0 

reg 

187 

255 


reg 

122 

227 

reg 

123 

38 

reg 

124 

124 

reg 

125 

31 

reg 

126 

227 

reg 

127 

225 

reg 

128 

120 

reg 

129 

69 

reg 

130 

227 

reg 

131 

180 

reg 

132 

227 

reg 

133 

1 90 

reg 

134 

1 44 

reg 

135 

29 

reg 

136 

227 

reg 

137 

132 

reg 

138 

227 

reg 

139 

56 

reg 

1 40 

217 

reg 

141 

28 

reg 

142 

227 

reg 

143 

201 

reg 

1 44 

227 

reg 

1 45 

164 

reg 

146 

172 

reg 

147 

227 

reg 

148 

39 

reg 

149 

150 

reg 

150 

43 

reg 

151 

33 

reg 

152 

27 

reg 

153 

19 

reg 

154 

252 


reg 

188 

1 

reg 

189 

252 

reg 

190 

3 

reg 

191 

0 

reg 

192 

16 

reg 

193 

21 

reg 

194 

30 

reg 

195 

22 

reg 

196 

22 

reg 

197 

4 

reg 

198 

36 

reg 

1 99 

1 7 

reg 

200 

15 

reg 

201 

4 

reg 

202 

28 

reg 

203 

32 

reg 

204 

28 

reg 

205 

25 

reg 

206 

38 

reg 

207 

4 1 

reg 

208 

36 

reg 

209 

20 

reg 

2 1 O 

47 

reg 

211 

21 

reg 

212 

1 8 

reg 

213 

49 

reg 

214 

21 

reg 

215 

254 

reg 

216 

252 

reg 

217 

0 

reg 

218 

15 

reg 

219 

169 


r eady. 


List wash 
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UTILITIES 3 


rem 

i-f peek (56)015 then print " 
tik voor run eerst 7 poke 56, 
? in.":end 

torx=0to217:reada:t=t+a 
_ __^ 


15 then print "CCLR-HOME3 
eerst 7 poke 56,15:clr 

eada:t=t+a:poke40704+ 

sys40704:end 


u a u « A / i| * ^ * ■ — 

d at a7,3,96,133 
d at a72, 164,15,192,1,240,23, 162,0 
datal 89,89, 159, 197,251,240,24,232, 
232 

data232,232,189,B9,159,201,0,240,3 

data76,29,159,104,168,104,170,104, 
165 

data251,76,26,167,169,91,32,71,171 
d at a23 2, 189,89, 159,48,3,76,59, 159 
data41,127,32,71,171,169,93,32,71 
datal71,104, 168, 104, 170, 104,76,0, 1 
67 

_ J- _ ■« r-i —r -»o A Z. ~7 "7 JL 9 1 Cl 1 A A 


100 

110 


120 

130 

140 

150 




160 

170 

180 

190 

200 

210 

220 


67 

d at a 1 9 
data66 

- 4- / O 




230 

240 


datal58,89,69,204, 
data68,206,88,29,8 
data71,212,133,70, 
9 


, 85 
13 
, 17 


183,88 


250 

260 

270 


280 


U fl L Q / V , i Ui I I-J 

d at a79,206, 1 
dat a193, 149, 


82 

19 




290 

300 


- ? » 7 — — 7 7 — ~ 7 7 r * 

6 

data 151,71,82, 177, 152,71,82, 178, 15 
3 

data76,71,210,154,76,66,204,155,71 
d at a82, 179,0 


*** EINDE LISTIN6 *** 


list wash 


regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 


4 

10 

30 

40 

50 

60 

70 

80 

90 

100 

110 

120 

130 

140 


254 

regel 

150 

173 

166 

regel 

160 

95 

53 

regel 

170 

199 

143 

regel 

180 

120 

164 

regel 

190 

22 

1 17 

regel 

200 

112 

152 

regel 

210 

53 

196 

regel 

220 

141 

1 4 1 

regel 

230 

106 

241 

regel 

240 

158 

2 

regel 

250 

49 

248 

regel 

260 

120 

79 

regel 

270 

153 

236 

regel 

280 

142 

94 

regel 

290 

87 

69 

regel 

300 

22 

33 

r ead y 

■ 



programma met afkortingen te hebben ingetikt het List, dan ziet 
u in plaats van de afkorting het commando voluit geschreven 
staan. Dus in plaats van het vraagteken staat dan Print. Het 
programma listig draait dit alles echter om, oftewel elke listing 
krijgt u nu te zien met de afkortingen van de commando’s en dat 
kan voordelen hebben, bijvoorbeeld als u een lange program¬ 
maregel wilt wijzigen. 


100 


110 

120 

130 

140 

150 

160 

170 

180 

190 

200 

210 

220 

230 

240 


rem 1ist ig 

rem door mare de hingh 
rem uit breda / 076—145652 
rem 5/ 

print”CCLR-HOMEDL neer 3 Dit progra 
mma zorgt ervoor, dat" 
print" tijdens het LISTen van een 
Basic—" 

print" programma de keywords af ge 
kort" 

print" verschijnen» (Zoals ze in 
Appendix D" 

print" van de User Manual opgesom 
d zijn)" 

print"Cneer3 Even geduld aub voor 
inlezen data." 

sys58451 : a = 53000: -f or 1 =0tol3: readd 
$ : -f orc = 0tol 0 

d1=asc(mid$(d$,ct2+1))—65:d2=asc( 
mid$(d$,c*2+2))-48 

pokea, 10*dl+d2:a = a+l:nexte,1 sprint 
"C op 3 Cshift-SPATIE3Toets ’n toet 
sC19xspatie3" 

wai1203,64,64:poke198,0:sys53000: 
print"CCLR-HOME31iet”s1ist 
data q2b9q0u7o2a6a3o0a7a3j6 
data b6a4ulz5u8a3h6y3q6d6b5 
data e8y9u1p3u8a4q9g3u8ylui 
data u4y0x7o4a2x3h6*f 6x 3m8n2 
data h3r0q9q0n3z2q9p7n3z1q0 
data a0u2e8b2x0z1u8a2x0z2r7 
data z Ib6y6e8yIu0r7zIe8g7d2 
data h 1 r1 u0o0z 3a3q9q0n3z4q9 
data p6n3z3q5z3t7z1 y0e 1r2z3 
data a3r7z1u9z3u8bBn6u8y7r2 
data z3a3r7z1eBc7d2h1r1x8z3 
data a3u8v5x0z3u8a2x0z4q0a0 
data r7z3b6y4e8u9r2z3a3r7z1 
data h3m8d2h1r1q4h3h6a0q7a0 


* * * EINDE LISTING *** 


U weet dat u de Basic-commando’s kunt afkorten. Het com¬ 
mando Print kunt u bijvoorbeeld door een vraagteken vervan¬ 
gen en Poke kunt u d.m.v. P(SH!FT)0 afkorten. Als u na een 


1 ist ig 

regel 

1 

91 

regel 

110 

229 

regel 

2 

221 

regel 

120 

8 

regel 

3 

15 

regel 

130 

62 

regel 

4 

243 

regel 

140 

47 

regel 

10 

0 

regel 

150 

54 

regel 

20 

106 

regel 

160 

28 

regel 

30 

215 

regel 

170 

38 

regel 

40 

78 

regel 

180 

40 

regel 

50 

10 

regel 

190 

80 

regel 

60 

204 

regel 

200 

82 

regel 

70 

201 

regel 

210 

30 

regel 

80 

59 

regel 

220 

44 

regel 

90 

193 

regel 

230 

66 

regel 

1 00 

173 

regel 

240 

221 


ready. 
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Duizenden 


Bij dit programma is het de bedoeling dat u het, door de 
dobbelsteen gegooide getal in een vakje plaatst. Als u de 
getallen die u hierdoor vormt bij elkaar optelt moet u zo dicht 
mogelijk het getal duizend benaderen. Mocht het u nog niet 
duidelijk zijn dan toch zeker wel na het een keer te hebben 
gespeeld. Het programma heeft iets weg van de kwis ’Cijfers en 
Letters’ die door de KRO wordt uitgezonden. 


r ", 

| 




100 


110 


1 1 1 


1 12 


1 15 
120 


130 

140 

145 

150 

155 

160 

170 


180 
190 
200 
1 000 
1010 
1020 

1030 

1040 

1050 

1 060 

1 070 

1080 

1090 

1 100 

1110 

1 120 

1 130 

1 1 40 

1 150 


print" C 3x op 3 CCLR-HOME3 " : pr intchr$ 

(5) s poke53 280,5:poke53281,5 
print"CCLR-HGME3":print"ClOxneer] 

C 1 5xrechts]duizenden" 

C8xrschts3k.muraczewski " 
pr int " C2xneer]C15xspatie3010-2582 
84"iforx-1to3000inextipr i nt " CCLR-HOME 
3 " 

print" C4xneer]" 

print"bij dit spel gooit de compu 
ter voor uC3xspatie3met 1 dobbels 
teen." 

print " u bepaalt in welk hokje de 
ogen van deC2xspatie]worp gezet w 
orden." 

pr int "het is de bedoeling dat u z 
o dicht " 

print" als maar mogelijk bij het g 

etal duizend komt"; 

print" als alles opgeteld is." 

print" voor gelijke getallen op ee 

n 1 i jn,hori- zontaai, "j 

pr int " vert icaal of diagonaal, kri 

jgt u 10 0 bonus punten, de compute 

r gebruikt 

print "deze alleen als het nodig i 
s om het ge- tal 1000 zo dicht ma 
gelijk"; 

print" te benaderen." 
g et s$:if s$=""thenl90 
print " CCLR-HOME3" 
gotol850 

pr int " C CLR-HOME 3 " : i-f x = l thenx s 0: return 
print"Cneer3Cop3C19xspatie 30-O 

p-p .. 

print"C19xspatie3l lC2xspatie3l 2 
IC2xspatie33 I " 

pr int"C19xspatie3l C4xspatie3l C3xspati 
e] IC4xspat ie] I " 

print" C14xspatie30 O-“O-P“ 

p ,, 

print"C14xspatie3l aC2xspatie3l C 4 x s p a 

tie3l C3xspatie3 IC4xspatie] I " 

print " C14xspatie3I C4xspatie3l C4xspati 

e3l C 3x spat i e 3 I C 4x spat i e 3 I " 

print" [ 14xspat ielO ü-O-P ” 


print " C14xspatie3l bC2xspatie3I C4xspa 

tie 3I C3xspatie3 !C4xspatie3 I " 

pr int " C14xspatie3l C4xspatie3l C4xspati 

e3l C3xspatie3 IC4xspatie3 I " 

print" C 14xspatie 3O O O P — 

-p ii 

pr int " C14xspatie3l cC2xspatie3l C4xspa 

tie3l C3xspatie3 IC4xspatie3 I " 

print"C14xspatie3l C4xspatie3l C4xspati 

e3l C3xspat ie3 IC4xspatie3 I " 

print" C 14 xspatielO O-O-P ” 

-p ,, 

print " Cóxspatisltotaal s I C4xspatie3 
I i 4x sp at i e 31 C3xspatie] IC4xspatie3 


1160 print" C 14xspat ie 3 L —__L ....L 
-✓ ** 

1 170 gosubl710i i-f q"lthönq«0i gotol510 
1180 d=int<rnd<1)*6)+1 

1190 r=22s k~Z :gosub1780:print“de dobbe 
1 steen gooit ";d 

1200 r=23igosubl780;print"waar zet u h 
et getal dC4xspatie3" 

1210 getr$:ifr$=""thenl210 
1220 ifr$="a"thenr=5:gotol260 
1230 ifr$="b"thenr=8sgotol260 
1240 ifr$="c"thenr=l1:gotol260 
1250 gotol210 

1260 getki: ifk*=""then 1260 
1270 if k * *"1"thenk = 20s gotol310 
1280 if k$="2"thenk = 25s goto 1310 
1290 ifk*="3"thenk=30: goto 1310 
1300 gotol260 

1310 poke211,30s poke214,23:sys58732s print 
r$+"-"+k*+"C2xspat ie3ok?" 

1320 getql:ifq$=""thenl320 
1330 ifq$< >"j"andq$<>"n"then 1320 
1340 if q$ s " n" thenr = 23s k =30: gosub 1780: pr in' 
"C8xspatie3":gotol210 
1350 g=k:h=r: r=23:k-3:gosub1780:print 
"T 35x spat iel" 

1360 k — g s r = h 

1370 gosub1710aifr=5andk=20anda1<>32then 
1490 

1380 ifr=5andk=25anda2< >32then 1490 
1390 ifr = 5andk=3 0anda3< >32then1490 
1400 ifr = 8andk = 20andbl< >32then 1490 
1410 ifr=Bandk = 25andb2<>321hen 1490 
1420 ifr=Bandk=30andb3O32thenl490 
1430 ifr=llandk=20andcl<>32then1490 
1440 i f r = 1landk=25andc2<>32thenl490 
1450 ifr-1landk = 30andc3< >32thenl490 
1460 gosub1780sprintd 
1470 k = 0:r = O 
1480 gotol170 

1490 k = 3:r=23:gosub1780:print"deze pla 

ats is al bezet ! !":forx = ltolO00:next 
1500 gosub1780 s print"C26xspatie3"sgoto 
1200sremwas1170 

1510 if al=a2andal=a3thenbo= | bo+100 
1520 ifbl=b2andbl=b3thenbo-bo+100 
1530 if c I s c2andcl=c3thenbo= : bo+100 
1540 ifal=clandal=blthenbo=bo+100 
1550 ifa2=c2anda2=b2thenbo=bo+100 
1560 ifa3=c3anda3=b3thenbo=bo+100 
1570 ifcl s b2andcl=a3thenbo=bo+100 
1580 ifal s =b2andal s =c3thenbo = bo+100 
1590 al=al-4B: a2=a2-48: a3=a3-48:b1=b1- 
48:b2=b2-48sb3=b3—48: cl=cl-48:c2 = 
c 2 —48 

600 c 3 = 03 — 48 

610 e^aS + bS + cS:x^int (e/10) s e B e“X#10 
620 t = x+a2+b2 + c2sx = int(t/10) s t=t-x*10 
630 h=x+al+bl+cl:x = i n t <h/10):h=h-x*10 
é>40 r=14: k = 15: gosub 1780: pr intx : k»20: gosub 
1780sprinth 

650 k = 25: gosub1780:printtï k = 30:gosub1 
780:printe 

660 getsï:ifs$=""thenl660 

670 ee=int<e + t* 1O + h* 1 0t2 + x* 10t3> 

680 ifee< 1000thenl800 
690 y=int(ee-1000) 

700 x=l:gotol010 

710 alapeek(1245)ia2»peek <1250):a3=peek 
<1255) 

720 b1=peek(1365)ïb2=peek(1370)ib3«peek 

(1375) 

730 c1=peek(1485):c2=peek(1490):c3=peek 
(1495) 

740 ifal<>32anda2<>32anda3< >32andb1< > 
32andb2<>32andb3< >32andc1< >32then 


1600 

1610 

1620 

1630 

1640 

1650 

1660 

1670 

1680 

1690 

1700 

1710 

1720 

1730 

1740 




















PRINT-OUT ■ PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT 


1750 

1760 

1770 

1780 

1790 

1800 

1810 

1820 

1830 

1840 

1845 

1850 

1860 

1870 

1880 

1890 

1900 

1910 

1920 

1930 

1940 

1950 

1960 


1970 


1980 


1990 


2000 

2010 


2020 


2030 


2040 


2050 


2060 


2070 


speler 
sp e1 er 
spel er 


r'jsu 
2“;s2$ 
3" ;s3$ 
4 ";s4* 


1760 

return 

i-fc2<>32andc3<>32thenq=l 

return 

poke211,k:poke214,r:sys58732 

return 

aa=int(ba):y=1000-ee 

ifaa>0andy>50 thenee = ee+100ï aa = aa 
— 1 0 0 ! y y = i n t ( y y + 1 0 0 ) 
ifee>1000thenl840 

y=1000-ees i -f aa >0andy >50 thenl810 
i*Fee>1000theny = ee~1000 
g ot o 1700 

input"hoeveel spelers (max 5 )";s 

P 

ifsp>5orsp<lthenl850 
inpufhoe heet speler l";sl$ 
i-fsp = lthenl960 

input" hoe heet speler 2" *, s2$ 
i*fsp = 2then!960 

inpufhoe heet speler 3";s3$ 
i-fsp=3thenl960 

input"hoe heet speler 4"; s4* 
i-f sp = 4then 1960 

input"hoe heet speler 5";s5* 
gosub 101 0s el-ees y 1 =y ! -f 1 =bos z l=yy s 
ee = 0!y = 0sbo = 0s yy = 0s aa = 0 ï ifsp=lthen 

2010 

gosub 1010: e2 = ee:y2 = y: -f2 = b os z2 = yy: 
ee==0! y = 0sbo = 0ï yy = 0: aa = 0: ifsp = 2then 
2010 

gosubl010:e3=ee:y3=y:f3=bo:z3=yy: 
ee = 0s y = 0:yy = 0:bo = 0 s aa = 0s i-fsp = 3then 
201 0 

gosub 1010! e4 = eesy4 = y!-f4 = bo: z4=yy: 
ee = 0!y = 0!yy = 0!bo = 0iaa = 0!i‘fsp ss 4then 

2010 

gosubl010: e 5 = e e iy 5 = y : f 5 = b o 5 z 5 = y y 
print"CCLR-HOMEI";"speler";" C2x 
spatieltot." bonus";" gebruikt";" 
verschil" 

printsl$;tab(7)el? tab( 15) -f 1 5 tab(2 
0 ) z 1 ; tab (30) y 1 s i-f sp = l then 2070 
pr i nts2$;tab(7)e2;tab<15)-f2;tab(2 
0 ) z 2 ,* tab (30) y2: if sp = 2then 2070 
pr ints3*> tab (7) e3| tab ( 15) -f3; tab (2 
0 ) z 3 ; tab < 30 ) y3 ! i f sp^then 2070 
pr ints4$; tab (7) e4; tab ( 1 5 ) -f 4 5 tab (2 
0 ) z 4 ; tab (30) y4: i-f sp = 4then 2070 
prints 5*j tab (7) «5;tab ( 1 5 > -f 5 ; tab <2 
0)z5;tab(30)y5 
end 


*** EINDE LISTING * * * 


duizenden 


regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 

regel 


100 
1 1 0 
1 1 1 
1 12 
1 15 
120 
130 
140 
145 
150 
155 
160 
170 
180 
190 
200 
1000 
1010 
1020 


172 

regel 

1030 

138 

regel 

1040 

68 

regel 

1050 

189 

regel 

1060 

33 

regel 

1070 

72 

regel 

1080 

74 

regel 

1090 

175 

regel 

1 100 

220 

regel 

1110 

76 

regel 

1 120 

25 

regel 

1 130 

44 

regel 

1140 

254 

regel 

1 150 

40 

regel 

1 160 

139 

regel 

1 170 

1 12 

regel 

1 180 

87 

regel 

1 190 

25 

regel 

1200 

154 

regel 

1210 


32 

138 

163 

142 
77 
163 

143 
77 
163 

144 
77 
163 
76 
246 
179 
246 
49 
148 
179 


regel 

1220 

164 

regel 

1660 

190 

regel 

1230 

168 

regel 

1670 

97 

regel 

1240 

21 1 

regel 

1680 

249 

regel 

1250 

77 

regel 

1690 

7 

regel 

1260 

170 

regel 

1700 

192 

regel 

1270 

175 

regel 

1710 

125 

regel 

12 80 

181 

regel 

1720 

137 

regel 

1290 

178 

regel 

1730 

149 

regel 

1300 

82 

regel 

1740 

194 

regel 

1310 

216 

regel 

1750 

142 

regel 

1320 

179 

regel 

1760 

1 46 

regel 

1 330 

121 

regel 

1770 

142 

regel 

1340 

35 

regel 

1780 

105 

regel 

1350 

133 

regel 

1790 

142 

regel 

1360 

202 

regel 

1800 

6 

regel 

1370 

193 

regel 

1810 

1 13 

regel 

1380 

55 

regel 

1820 

251 

r eg e 1 

1390 

52 

regel 

1830 

1 84 

regel 

1400 

53 

regel 

1840 

47 

regel 

1410 

59 

regel 

1845 

81 

regel 

1420 

56 

regel 

1850 

57 

regel 

1430 

96 

regel 

1860 

1 92 

regel 

1440 

102 

regel 

1870 

170 

regel 

1450 

99 

regel 

1880 

136 

regel 

1460 

1 16 

regel 

1890 

172 

regel 

1470 

155 

r eg e 1 

1900 

137 

regel 

1480 

82 

regel 

1910 

174 

regel 

1490 

1 06 

regel 

1 920 

138 

regel 

1500 

1 19 

regel 

1930 

176 

regel 

1510 

3 1 

regel 

1940 

139 

regel 

1520 

35 

regel 

1 950 

178 

regel 

1530 

39 

regel 

1 960 

1 6 

regel 

1540 

31 

regel 

1970 

21 

regel 

1 550 

35 

regel 

1980 

2 6 

regel 

1560 

39 

regel 

1990 

3 1 

regel 

1570 

36 

regel 

2000 

55 

regel 

1580 

34 

regel 

2010 

3 i 

regel 

1590 

26 

regel 

2020 

1 24 

regel 

1600 

181 

regel 

2030 

130 

. _ , r 

regel 

1610 

205 

regel 

2040 

136 

regel 

1620 

8 

regel 

2050 

1 42 

regel 

1630 

213 . 

regel 

2060 

2 1 3 

regel 

regel 

1640 

1650 

19 

107 

regel 

r ead y 

2070 

• 

1 28 



1 

2 

3 

4 

160 

170 

180 


190 

200 

210 


rem soundmon 1-1 

rem door -F- inklaar 

rem reeds eerder geplaatst! 

rem 

sid=54272 

print"CCLR-HOMEDC 8x n eer 3 C 1 2xspatie! 
even geduld a.u.b." 

dim *(128), nt(37>, at*<15), de*( 

15), su$(15), re$(15), si(360>, c 

o(360) 

•for i = 1 to 37: read nt(i)s next 
-For i = 1 to 8: read 1 -f C i ) s next 
-for i = 1 to 8 s read h-f(i)s next 


;;ï 


Soundmon 1.1 


Twee nummers geleden plaatsten wij een artikel over de geluid- 
schip van de C-64 met daarbij het programma Soundmon 1.1 . 
We drukten van dit programma de originele listing af en dit 
leidde bij een groot aantal mensen tot problemen. Volop bestu- 
rings- en grafische tekens in een listing werken nu niet bepaald 
prettig en vandaar dat wij bij deze aan de wens van een groot 
aantal lezers tegemoet willen komen en de listing nu nogmaals, 
maar met behulp van het Visilistprogramma en met de Check- 
sum controlegetallen plaatsen. 


































Een macht aan software voor een 
vriendelijke prijs. 

Met zo’n cassette is er in één keer al een 
aardig begin voor uw programma-bibliotheek 
en bovendien kunt u aan de hand van de 
gegeven programma’s daar zelf weer 
uitbreidingen op maken. 

Beschikbaar voor de „ 64 ” 

uit no. 1 + 2 + 3 van ’84 I 

uit no. 4 + 5 van ’84 II 

uit no. 1 + 2 van ’85 III 

uit no. 3 + 4 van ’85 IV 

uit no. 5 + 6 van ’85 + ’Surfmania ’85’ V 

uit no. 7 + 8 van ’85 VI 

uit no. 9 + 10 van ’85 -> VII 

uit no. 1 + 2 van ’86 VIII 

Beschikbaar voor de C- 16 : 

Verzamelcassette incl. Checksum en Visilist 
per diskette ƒ 27,50 
per cassette ƒ 22,50 

Wilt U bij bestelling aangeven no. I, II, lil IV V 
VI, VII of Cl 6. ’ ’ 


■ ■ + ! " ' , ."y r 


De listings uit dit en eerdere nummers van Commodore-lnfo zijn 
ook op cassette en micro-floppy te verkrijgen. Dat scheelt de 
lezer de tijd en ergernis van het overtypen, hetgeen tenslotte zelfs 
met onze listtest nog een boel werk kan betekenen, om nog maar 
niet te spreken van ergernis en frustratie. 

De lezersservice van Commodore-lnfo wordt verzorgd door 
Infolist 


Bestellen kan alleen bij vooruitbetaling door overmaken van ƒ 22,50 of ƒ 27,50 op 
giro 3157656 Infolist Huizen met vermelding van het infolistnummer en natuurlijk 

uw naam en adres. We sturen u de cassette direkt na ontvangst van uw overmaking 
per post op. 

INFOLIST Postbus 1047, 1270 BA Huizen, tel.: 02152-62343 










:: - 


«■MIS 




Wmxm 


8; /. iilll 8 

ÉliïSlSiSIÉ 


1 








IMMI 


. ii# lil l 

: ■ "' ' : ff II 

ff 8 mmm : 

WÊÊÊÊstÊÊÊÊÊÊlÊÊBtM 


llllffii I 

' : ■ . ■■ : . 

I8111M 

i : ■■ 


m èB ÊËê SÊÊËIë 


PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRlNT-OUT 


llllll 

WêêSè 




8f ■■ 888.8:888 

' ■ 


' 


■Mn 

. 

V '"," . 
-8'•B'-f "'8-''8'8 : ‘ ,: 




mm 


+ 8 8B 




220 

i -0: 

j =0 


230 

read 

a: if a=-1 

goto 250 

2 40 

poke 

230 

49152+i,a: 

j = j+a: i = i + 1: goto 

250 

read 

a : if a< > j 

then print"fout i 


n data (regel 5100-5310)": stop 
260 sys 49152: rem start interrupt ro 
utine 

270 -for i =0 to 24: poke sid + i , 0: next 
: rem reset sid 
280 -for i=0 to 360 
290 co ( i)=cos<i*/180) 

300 si ( i )*sin(i#/180) 

310 next 

320 rem * set sprites # 

330 poke 53248,72: poke 53249,150 
340 poke 53250,136: poke 53251,150 
350 poke 53271,3: poke 53277,3 
360 poke 2040,13: poke 2041,14 
370 sp=0: gasub 3600 
380 sp=l ï gosub 3600 

390 poke 53287,14: poke 53288,14: poke 
53280,14 

400 poke 53269,3 

410 rem * in it. variabelen * 

420 at=3: de=7; su = 5: re=9 

430 pw=2048: fs=5: vo=15: tr=l 

440 poke 650,128 

450 rem init. strings 

460 at$="CHGME3 tneer3C10xrechts3 " 

470 de$="C HOME 3C3xneer 1 C10xrechts3 " 

480 5U$="CHÜMED C 5 x n e e r 3 C10xrechts3 " 

490 re$ =l ' CHÜME3 C7xneer3 C 10xrechts3 " 

500 for i=0 to 15 
510 read a$, b * 


520 at$(i)=at$+a$ 

530 de$(i)=de$+b$ 

540 su$(i)=su$+str$(i)+"/l5 " 

550 re$(i)=re$+b$ 

560 next i 

570 a$="C23xrechts3" 

580 tr$=at$+a$ 

590 sa$=de$+a$ 

600 pu$=su$+a$ 

610 pw$=re$+a$ 

620 a$="C10xneer3Crechts]" 

630 lp$=tr$+a$ 

640 bp$=sa$+a$ 

650 hp$=pu$+a$ 

660 rs$=pw$+a$ 

670 fr$=rs$+"[2xneer3" 

680 ac$(1)=" on" 

690 ac$(0)=" off" 

700 gasub 4000: rem scherm set up 
710 gosub 2300: rem update scherm+sid 
1000 geta$: if a$<>"" then 1000: rem c 
lear buffer 

1010 if peek(197)=64 goto 1010 
1020 a=peek(197): get a$: if a$ = "" goto 
1020 

1030 if a >37 goto 1060 

1040 nt=nt(a): if nt=0 goto 1060 

1050 goto 1500 

1060 rem * commando * 

1070 if a$=chr$(13) then gosub 3000: goto 
1000: rem analyseer 

1080 gosub 2000: goto 1000: rem wijzig 
p ar ameter s 

1500 rem # start toon * 

1510 ff=328*1og(fs#(256 *h f(nt)+1f(nt)) 


Moe van het overtikken? 
Neem Uw gemak, neem een 


INFOLIST 

cassette of diskette 
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1520 

1530 

1540 

1530 
1 560 
1570 

1580 

1590 

2000 

2010 

2020 

2030 

2040 

2050 

2060 

2070 


)-1963 

fh = int(ff/8> 
fl=ff-fh*B 

poke s i d + 1 4, 1 -f < n t) : poke sid+15,h 
f ( n t) 

poke sid+21,fl: poke sid+22,fh 
poke s i d +1 8 , wv+ 1 s rem start toon 
i-f peek (197)=a goto 1570 srem wac 
h t op loslaten toets 




poke sid+18|wvi 
c y c 1 e 
goto 1000 
if (a$="a") and 
t+1s goto 2300 
i-f (a$="A") and 
-1: goto 2300 
i f < a $ = " d " > and 
e+1: goto 2300 
i-f (a*= H D"> and 
-Is goto 2300 
i f (a$= "s") and 
u+1: goto 2300 
i-f <a$=" S") and 
-1 : goto 2300 
i-f <a$= "r" ) and 
e +1: goto 2300 
i-f (a$=" R") and 
-ls goto 2300 


rem start release 


<at<15) 
(at >0) 
<de<15) 
(de >0) 

< su<15) 

< su >0) 

(r e<15) 


then at=a 
then at=at 
then de-d 
then de=de 
then su=s 
then su=su 
then r e = r 


(re>0) then re=re 


2080 

if 

a* = " 

p" then 

p u= 1 s 

goto 

2300 

2090 

if 

a$=" 

P" then 

p u = 0: 

goto 

2300 

2100 

i f 

a$=» 

o" then 

sa-1 : 

goto 

2300 

21 10 

if 

a$=“ 

0" then 

sa=0 : 

goto 

2300 

2120 

if 

a$=" 

t“ then 

tr = l s 

goto 

2300 

2130 

if 

a* = " 

T" then 

t r =0: 

goto 

2300 

2140 

if 

(a^ = 

+") and 

(pw<4095) 

then 


2150 

2160 

2170 

2180 

2190 

2200 

2210 

2220 

2230 

2240 

2250 

2260 

2270 

2280 

2290 

2300 

2310 

2500 

2510 

2520 

2530 

2540 

2550 

2560 


=pw+l: goto 2300 

i-f (a$- ,1 w n ) and (pw<3996> then pw 
=pw+100s goto 2300 

i-f (a$ = "- ,, > and (pw>0) then pw = pw 
-ls goto 2300 

i-f (a$* 11 W") and <pw>100) then pw* 
pw-100i goto 2300 
if a $ = "h" then h p = 1 s goto 2300 
i-f a$="H" then hp = 0: goto 2300 
i-f a$ = "l “ then lp = l: goto 2300 

i f a $ *"L u then 1 p = 0 s goto 2300 

i-f a $ = " b " then b p = 1: goto 2300 

if a$="B" then b p = 0 : goto 2300 

if " ) and (fs<10> then fs = f 

s+.25i goto 2300 

if (a$*”F") and (fs>.25) then fs = 
fs-.25ï goto 2300 

if (a$="v") and (vo<15) then vo=v 


goto 2300 
goto 2300 
goto 2300 
goto 2300 
goto 2300 
goto 2300 
0) then f s = f 

25) then fs = 
5) then vo=v 


o + 1 s 

if (aS^'V’') and (vo>0) then vo = vo 
-1 ! goto 2300 

if (*$=“e“) and (rs<15) then rs*r 
s +1s goto 2300 

if (a$="E") and (rs>0) then rs = rs 
- 1 s goto 2300 

fa=0s if (hp = 1) or (lp*l) or (bp = 1 
) then f o*1 
wv=64ipu+32*sa+lóttr 
rem update scherm 

print at*(at), del(de), su$(su), 
r e£ < r e) 

print pu$ ac$(pu) t trt ac$ (tr) , S 
aS ac$(sa) 

a$»str$(pw)s print pwt+at+1eft$(" 

CSxspatiel 11 ,5-len <a*) ) 

rem <t vul string aan tot lengte 

4 met spaties) 

print lp$ ac$(lp) P hp* ac$(hp), b 
p* aci(bp) 

a$-str$(rs)s print rsi+ai+left$(" 
[3xspatie]"|3-len(a$)> 


goto 2300 


(vo >0 ) then va = vo 
( rs<15) then rs*r 
(rs>0> then rs = rs 


su $(su) 


2570 

2580 

2590 

2600 

2610 

2620 

2630 

2640 

2650 

3000 

3010 

3020 

3030 

3040 

3050 

3060 

3070 

3080 

3090 

3100 

3110 

3120 

3130 

3140 

3150 

3160 

3170 

3180 

3190 

3200 

3210 

3220 

3230 

3240 

3250 

3260 

3270 

3280 

3500 

3510 

3520 

3530 

3540 

3550 

3560 

3600 

3610 

3620 

3630 

3640 

3650 

3660 

4000 

4010 


a$=str$(fs)s print fr$+a$+left$(" 

C5xspat iel",5-len <a*)) 

rem update sid 

i=int(pw/256): j=pw-i*256 

poke sid+16,is poke sid+17,i 

poke sid+19,ló*at+de 

poke sid + 20,16*su+re 

poke sid+23,16*rs+4*fo 

poke sid+24,64*hp+32*bp+16*lp+vo 

return 

f * 16 s poke 53287,6s poke 53288,6: 
poke 53280,2 

poke sid+14,f: poke sid+15,0 
poke sid+18,wv+8ï poke sid+18 r wv 
fori= 1 to 122s a(i)=peek(sid+27) 

: next i 
poke 53287,14 

sp a 0! gosub 3600: for x = l to 20 
ym=int(a(int( x * 6.4 ))/14) 
for y=l to yms gosub 3500 
next y,x 

rem * fourier transformatie * 

poke 53288,14 

sp=ls gosub 3600 

f or n=1 to 10 

la=122/ns s=0i c=0 

for i=l to 122 

i=i/la-int(i/la) 

s=s+a(i)*si(j *360) 

c»c + a(i)*co(i*360) 

next is if (s=0) and (c*0) then 3 
280 

am(n)=3*log(s*s+c*c)/log(2) 
if n=l then am(0)=am(l) 
for y=l to yms gosub 35O0 
x=2*n-ls ym=int(19-(am(0)-am(n))/ 
1.5) 

if ym<0 then 3270 

if ym>19 then ym*19 

for y = 1 to yms gosub 3500 

next y 

nex t n 

poke 53280,14: return 
rem * plot in sprite * 
xr=x+2: yr = 22-y 

bi=7-(xr-int(xr/8)*8) 
by=by+832: if sp-1 then by=by+64 
poke by, (peek (by)or (2Tbi) ) 
return 

by = 832 s if sp=1 then by = by + 64 
for i=0 to 2s poke by+i,255: next 
for i=5 to 59 step 3; poke b y + i , 1 
: next 

for i=62 to 60 step -ls poke by+i 
,255 s next 

for i=57 to 3 step -3s poke by+i, 
1 28: next 

for i=4 to 58 step 3: poke by+i,0 
: next 
return 

pr int " CCLR—H0ME1 r 


4020 

4030 


4040 

4050 


print"BCgr i is 33 aC1.b1auw3ttack 
C2x«patie3:CllxspatielBCgriis 3 3 t 
Cl.blauw!riangleC 2 xspatie]iC4x 
spat ielNMB"; 

print"BC20xspatie3BC17xspatie3B"j 
print"BCgrijs 31dCl.blauwlecay 
C 3 xspat iel: CllxspatielBsawttgriis 
31o C1 .b1 au wlothC2xspatie3: C4xspa 
t iel NI B" 5 

pr int"BC20xspatie1BC17xspatie3B"; 
print"BCgriis 3 3 s C 1.blauwlustain 
:CllxspatielBCgriis 33pCl.blauw3u 
lseC5xspatiel:C3xspatiel IP—.B" « 
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4060 

print"BC20xspatielBC17xspatielB"; 

4240 

return 





4070 

print"BCgriis 3 ] r C 1.blauwlelease 

5000 

rem 

nt array (current key 

> noot) 


: C HxspatielBpulseCgriis 3 ] w C 1 .blauw] 

5010 

data 

0 , 0 , 0 , 0,0 , 

0 , 0 , 

1 , 0,0 




idths C 6 xspatie]B"; 

5020 

data 

2 , 0 , €>, 0, 0 , 

3,0, 

0,4,0 



4080 

print"BC20xspatie]BC17xspatielB"; 

5030 

data 

0 , 0 , 0 ,5 ,0 , 

0 , 6 , 

0 , 0,0 



4090 

print" h-r- l t- 

5040 

data 

0,7,0,0, 8 , 

0,0 





-~H "; 

5050 

rem 

1 -f array. (low f requencies) 


4100 

print"BomhBC17xspatielBC16xspatiel 

5060 

data 

37,63,154, 

227, 

177,214,94, 

75 


B" ; 

5070 

rem 

hf array (high 

■F r equenc i es ) 

4110 

print"Br-iBC2xspatie3vormC3xspatie] 

5080 

data 

17,19,21,22,25 

,28,32 

, 34 



inhoudC2xspatie]BCgriis 331 Cl .blauw] 

5090 

rem 

machinet aa 1 

in t er r up t 

r out i n e 


owpass[3xspatie]:[Sxspatie]B"; 

5100 

data 

120, 169, 

13, 

141 , 

20 , 

3 

4120 

print"BB BBC17xspatie]BC16xspatiel 

5110 

data 

169, 192, 

141, 

21 , 

3, 

88 


B" 5 

5120 

data 

96, 234, 

72, 

152, 

72, 

138 

4130 

print"BB BBC17xspatie]BCgriis 3 ] b 

5130 

data 

72, 160, 

e, 

162, 

8 , 

169 


Cl.blauw]andpassC2xspatie]j[5xspatie] 

5140 

data 

250, 133, 

253, 

169, 

6 , 

133 


B" ; 

5150 

data 

254, 173, 

28, 

212 , 

141 , 

108 

4140 

print"BB BBC17x»pati®]BC16x«pati®] 

5160 

data 

192, 224, 

0 , 

240, 

58, 

202 


B" ; 

5170 

data 

138, 72, 

173, 

108, 

192, 

20 1 

4130 

print"BB BBC17xspatie]BCgrijs 33h 

5180 

data 

32, 176, 

17, 

106, 

24, 

106 


Cl.blauw]ighpassC2xspatie]sCSxspatie] 

5190 

data 

170, 189, 

109, 

192, 

145, 

253 


B" 5 

5200 

data 

169, 0, 

141 , 

108, 

192, 

76 

4160 

print"BB BBC17xspatie]BC16xspatie] 

5210 

data 

81, 192, 

169, 

160, 

145, 

253 


B" 3 

5220 

data 

56, 173, 

108, 

192, 

233, 

32 

4170 

print"BB BBC17xspatie]BrCgriis 3] 

5230 

data 

141, 108, 

192, 

56, 

165, 

253 


eCl.blauw]sonance :CSxspatie]B"; 

5240 

data 

233, 40, 

133, 

253, 

165, 

254 

4180 

print"BB BBC17xspatielBClóxspatie] 

5250 

data 

233, 0, 

133, 

254 , 

104, 

170 


B" ; 

5260 

data 

76, 37, 

192, 

234, 

104, 

170 

4190 

print"BB BBC17xspatie]BCgrij s 3 ] f 

5270 

data 

104, 168, 

104, 

76, 

49, 

234 


Cl,blauw]requency s C5xspatie]B"; 

5280 

data 

0, 32, 

100 , 

111 , 

121 , 

98 

4200 

print"B L - J BC17xspatie]BClóxspatie] 

5290 

data 

248, 247, 

227, 

-1 




B" ; 

5300 

rem 

checksum 





4210 

print" L - L - L - 

5310 

data 

15693 






9 

5320 

rem 

strings voor schermoutput 


4220 

print"Cneer3C Mxspatie]soundmon 1 

5330 

data 

" 0 (C2xspatie32 ms) 

" , " 0 

( C 2 x s p 


. 1 " 


atie ]6 ms)" 





4230 

print" C8xspatie3terrestrial so-ftw 

5340 

data 

" 1 (C2xspatie]8 ms) 

11 II « 

f 1 

( 


are 1985"; 


24 ms) " 




1 



Prijs 


ƒ24,90 


Rechtstreeks te 



bestellen bij Infolist 
met de bestelbon 




elders in dit blad. 
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, , , / I 

■ 


5330 

5360 

5370 

5380 

5390 

5400 

5410 

5420 

5430 

5440 

5450 


5460 


5470 


5480 


data " 
data M 
data " 
data " 
data " 
data " 
data " 
data " 
data " 
data " 
data " 
2xspat 
data " 
2x spat 
data H 
15 s ) 
data " 
24 s ) 


2 < 16 (ns) H 

3 < 24 (Tis) " 

4 ( 38 nis) " 

5 ( 56 m*>” 

6 ( 68 ras)" 

7 ( 80 ms) " 

8 (100 ms)" 

9 (250 ms)" 

10 (500 ms) " 

1 1 (800 ms) " 


( 48 
( 72 
(114 
(168 
(204 


ms) ' 
ms) ‘ 
ms) ‘ 
m* > 1 
ms) ' 


(240 ms)' 
(300 ms) 1 


12 ( C2xsoatiel1 s 
i e 1 3 s ) " 

13 (C2xspatie]3 s 
i e 1 9 s ) " 

14 (C2xspatie]5 s 


(750 ms) 
(1.5 s ) 
(2.4 s ) 
) M " 1 2 


15 ( C 2x spatie 3 8 s 


) ” , " 1 3 ( C 

) ” , " 1 4 ( 

) " , " 1 5 ( 


*** EINDE LISTING *** 


soundmon 1.1 


regel 

1 

146 

regel 

640 

47 

regel 

2 

57 

regel 

650 

70 

regel 

3 

127 

regel 

660 

85 

r eg e 1 

4 

143 

regel 

670 

71 

r ege 1 

160 

150 

regel 

680 

189 

regel 

170 

61 

regel 

690 

250 

regel 

180 

15 

regel 

700 

109 

regel 

190 

1 16 

regel 

710 

171 

regel 

200 

50 

regel 

1000 

42 

regel 

2 10 

46 

regel 

10 10 

166 

regel 

220 

1 45 

regel 

1 020 

83 

regel 

230 

124 

regel 

1030 

55 

regel 

240 

24 

regel 

1040 

33 

regel 

250 

53 

regel 

1050 

79 

regel 

260 

237 

regel 

1060 

49 

regel 

270 

158 

regel 

1070 

6 

regel 

280 

233 

regel 

1080 

1 00 

regel 

290 

39 

regel 

1500 

177 

regel 

30O 

50 

re ge 1 

1510 

161 

regel 

310 

130 

regel 

1520 

183 

regel 

320 

249 

regel 

1530 

237 

regel 

330 

204 

regel 

1540 

1 65 

r ege 1 

340 

23 9 

regel 

1 550 

187 

regel 

350 

48 

regel 

1560 

213 

r eg e 1 

360 

22 

regel 

1570 

88 

regel 

370 

21 

regel 

1580 

43 

regel 

380 

22 

regel 

1590 

74 

regel 

390 

1 

regel 

2000 

12 

regel 

400 

255 

regel 

2010 

85 

regel 

410 

30 

regel 

2020 

235 

regel 

420 

171 

regel 

2030 

52 

regel 

•430 

155 

regel 

2040 

87 

regel 

440 

249 

regel 

2050 

160 

regel 

450 

27 

regel 

2060 

35 

regel 

460 

245 

regel 

2070 

1 08 

regel 

470 

1 1 

regel 

2080 

237 

regel 

480 

76 

regel 

2090 

1 08 

regel 

490 

93 

regel 

2100 

2 1 9 

regel 

500 

182 

regel 

2110 

90 

regel 

5 1 0 

1 26 

regel 

2 120 

242 

regel 

520 

205 

regel 

2 130 

1 1 3 

regel 

530 

1 82 

regel 

2140 

152 

regel 

540 

1 1 1 

regel 

2150 

45 

regel 

550 

2 1 0 

regel 

2160 

247 

regel 

560 

203 

regel 

2 170 

98 

regel 

570 

246 

regel 

2180 

216 

regel 

580 

68 

regel 

2190 

87 

regel 

590 

38 

regel 

2200 

224 

regel 

600 

86 

regel 

2210 

95 

regel 

610 

71 

regel 

2220 

204 

regel 

62© 

34 

regel 

2230 

75 

regel 

630 

75 

regel 

2240 

124 


: m f:i ee " aisasss : : ee. il 

' ' " " ■■■■: ■■■•:* ..• -V ' ism ■■■■ : p' : " ' : ' 


regel 

2250 

47 

r eg e 1 

4040 

94 

regel 

2260 

81 

regel 

4050 

18 

regel 

2270 

154 

regel 

4060 

94 

regel 

2280 

64 

regel 

4O70 

70 

regel 

2290 

137 

regel 

4080 

94 

regel 

2300 

29 

regel 

4090 

203 

regel 

2310 

204 

regel 

4 10O 

4 

regel 

2500 

20 

regel 

4110 

225 

r eg e 1 

2510 

171 

r eg e 1 

4120 

164 

regel 

2520 

6 

regel 

4130 

95 

regel 

2530 

12 

regel 

4140 

164 

regel 

2540 

197 

regel 

4150 

106 

regel 

2550 

212 

regel 

4160 

164 

regel 

2560 

6 

regel 

4170 

177 

regel 

2570 

239 

regel 

4180 

164 

regel 

2580 

50 

regel 

4190 

197 

regel 

2590 

1 2 

regel 

4200 

74 

regel 

2600 

54 

regel 

4210 

228 

regel 

26 1 O 

146 

regel 

4220 

241 

regel 

2620 

171 

regel 

4230 

171 

regel 

2630 

1 37 

regel 

4240 

142 

regel 

2640 

86 

regel 

5000 

139 

regel 

2650 

142 

regel 

5010 

240 

regel 

3000 

9 

regel 

5020 

248 

regel 

3O10 

2 1 

r ege 1 

5030 

250 

regel 

3020 

226 

regel 

5040 

234 

regel 

3O30 

184 

regel 

5050 

29 

regel 

3040 

49 

regel 

5060 

206 

regel 

3050 

17 

regel 

5070 

71 

regel 

3060 

164 

regel 

5080 

237 

regel 

3070 

150 

regel 

5090 

153 

regel 

3080 

95 

regel 

5100 

33 

regel 

3090 

222 

regel 

5110 

55 

regel 

3 1 00 

50 

regel 

5120 

109 

regel 

3110 

22 

regel 

5130 

O 

regel 

3120 

183 

regel 

5140 

148 

regel 

3130 

157 

regel 

5150 

195 

regel 

3140 

230 

r eg e 1 

5160 

90 

regel 

3150 

179 

regel 

5170 

199 

regel 

3160 

5 

regel 

5180 

94 

regel 

3170 

219 

regel 

5190 

3 

regel 

3180 

175 

regel 

5200 

103 

regel 

3190 

229 

regel 

5210 

207 

regel 

3200 

52 

r eg e 1 

5220 

151 

regel 

3210 

150 

regel 

5230 

203 

regel 

3220 

56 

regel 

5240 

195 

regel 

3230 

135 

regel 

5250 

134 

regel 

3240 

181 

regel 

5260 

152 

regel 

3250 

150 

regel 

5270 

155 

regel 

3260 

219 

regel 

5280 

29 

regel 

3270 

208 

regel 

5290 

59 

regel 

3280 

242 

regel 

5300 

226 

regel 

3500 

144 

regel 

5310 

139 

regel 

3510 

143 

regel 

5320 

178 

r eg e 1 

3520 

22 

regel 

5330 

225 

regel 

3530 

62 

regel 

5340 

25 

regel 

3540 

29 

regel 

5350 

80 

regel 

3550 

201 

regel 

5360 

78 

regel 

3560 

142 

regel 

5370 

1 30 

regel 

3600 

216 

regel 

5380 

141 

regel 

3610 

101 

regel 

5390 

137 

regel 

3620 

23 

regel 

5400 

* 133 

regel 

3630 

86 

regel 

5410 

173 

regel 

3640 

40 

regel 

5420 

190 

regel 

3650 

20 

regel 

5430 

1 83 

regel 

3660 

142 

regel 

5440 

188 

regel 

4000 

123 

regel 

5450 

169 

regel 

4010 

229 

regel 

5460 

179 

regel 

4020 

94 

r eg e 1 

5470 

228 

regel 

4030 

142 

regel 

5480 

233 
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Pakspel 


Het programma pakspel speelt u tegen de computer. Het is de 
bedoeling dat u om de beurt een kaart van de stapel pakt. Op de 
kaarten staan korte woordjes en het is de bedoeling om drie 
woordjes te verzamelen die een willekeurige letter gemeen 
hebben. Bijvoorbeeld de woordjes poes, stolp, en kado hebben 
de letter o gemeen. Dit klinkt nu niet bepaald als een aantrekke¬ 
lijk spel, maar niets is minder waar. Het is één van de beste 
listings die ik tot nu toe onder ogen kreeg. Behalve de fraaie 
weergave op het scherm is het spel dat zo simpel lijkt bijzonder 
boeiend. Het zou een onderdeel van een I.Q.-test kunnen zijn. 
We kunnen u dit educatieve en leuke spel van harte aanbevelen. 


rem pakspel / cbm-64 

rem door -fans rei jsbergen 

rem leidschendam / 070-278619 

rem 

poke53280,Os poke53281,0 b print"CCLR-HO 
ME 3CWIT3"s p c = O:ps = Os ke = 0s gosub630 
w*="123456789147258369159357" 

*f ar i = l to22step3: f or i = 01 o 2 i q ( 1 + int 
(i/3),j+l)=val(mid$(w$,i +i ,1)): next 
s n ex t 

a*="UCCCCCÏ[neer 3[7x1inkslB"sb$=" 
BCneer ] C7xl i n k s 3 J CCCCCK M !d$= ,M, !for 
i=1to33:d$ = d $+"[rechts]":next 
p — 0 » ke = ke+l ï i-f ke a 7thenke = 0! restore 
fori = 11 o 9 sreadc$(i) :next s readw$ 
print" C CLR—HOME 1 Cl.rood 3" s fori = lto 
8step2:printtab<13)a $ c $(i)b$"[2xop]" 
a$c$ ( i + 1)b$;next 
printtab(16)a$c$(9)bS 
print"CHOME 3"spc <12) "UCCCCCCCCCCC 
CCCI" s-fori = ltol5sprintspc(12) "B" spc ( 
12) "C 2 x r echt s 3B"s next 
printspc <12) "JCCCCCCCCCCCCCCK" 
print"CHOME 3 CGEEL 3"a*"comp. "b$ s pr int 
"CHOME 3"tab(33)a$"mens. "b$:print" 
CHOME3Cgriis 23Cneer3C7xrechts3" p 
cspc <19)ps 

fori=lto9sp <i)=0sc ( i ) =0: next: pt=5 
s c t =5 

ad, l)=0;a<2, l)=0:a(3, 1)=4:a(4, 1) 

= 4:a(5, 1)=7:a (6, l)=7:a(7, 1 > =10 
a(8, 1)=105 a(9, 1)=13:a(9,2)=17:for 
i=lto8step2:a(i,2)=14:a(i+l,2)=21 
s nex t 

e$="Cgri 3 5 33 CHOME 3 C20xneer= 

"C37xspatiel[GEEL3 " 

printers input"wie begint er [RVS-aan] 
c [ RVS~u i t 3 omp ut er o-f C RVS-aan 3 m C RVS-u 
it 3ens" | i$: if leU$(i$, l)="m" thenp 
= 1 

printe$" [neer] " f $ 
ct=3:p t =3 sfori=ito9 

ifc ( i ) = lthenpr int " CH0ME3 " s f or i*lto 
ctsprint"Cneer3";:next:printa$c$( 
i)b$:gosub310 
i-fc ( i ) = lthenct = ct+3 

i-f p ( i ) “lthenpr int" [H0ME3 " :fori = lto 

pt:print"Cneer3";snext:printd$a$c 

$ ( i)b$s go5ub310 

ifp(i)=1thenpt=pt+3 

nex t i 

forz=ito8s gosub830s wl=c(c)+ c <d)+c 
(e) ï i-fwl = 31 h en 330 

wl = p (c)+p < d ) +p (e) s ifwl=3then350 
n e x t z 

t e - 0 s -f or i = 11 o 9 i i-fc ( i ) «1 thente = te + 

1 

ifp(i)=lthente=te+l 
next i : ifte=9then410 


100 

110 


120 


130 


140 


150 


160 


170 

180 

190 


200 

210 


220 

230 

240 

250 

260 

270 

280 

290 


300 

310 


320 

330 

340 

350 

360 

370 

380 

390 

400 

410 

420 

430 

440 

450 

460 

470 

480 

490 

500 

510 

520 

530 

540 

550 

560 

570 

580 

590 

600 

610 

620 

630 


640 


650 


660 


670 


680 


690 


700 


710 


720 


730 


740 


750 


got o430 

print"CHOME3"sfori-1toa<i,1)sprint 

"[neer]";:next:fori=ltoa(i,2)sprint 

"[rechts]";snext 

print"Cop3C5xspatie3"sreturn 

prIntel"[3xspatie]de komputer hee 

ft gewonnen met de":pc=pc+l 

gato360 

pr i nte$"[5xspatie3de mens heeft g 

ewonnen met de":ps=ps+l 

print"Cneerlletter *"mid$(wl,z,1) 

" 51 die in drie woorden voorkomt" 

print"Cneer][8xspatie]***#***nog 

maals♦******"; 

geti$:ifil="S"thengoto40 

ifi* = "n"thenprint"CCLR-H0ME3 C4xneer3 

C2xspatie3einde "send 

g ot o380 

printel"C3xspatie3geliJk spel nie 
mand heeft gewonnen" 
got o370 
i f p = 0then530 

p=0sprinte$! input"welk woord";i$ 

printel"[neer]"f$ 

iflen <iS)<3then440 

iflen < i $)=3thenil=" " + i* 

i $ = i $ + "[3xspatie]" 

fori=lta9:ifleft$(il,5)=cl(i)andp 
(i )=0andc <i)-0thena=i:goto510 
nex t i 

ifi=10thengoto440 
p ( i ) -1 s g o t o 1 8 0 

p = lsforz = lto8sgosub830swl=c < c)+c( 
d)+c(e) 

if wl=21 hen a —— c* <c(c)-l)-d*<c<d)- 
1) -e*(c(e)-1 )sifp(a)<>lthen560 
next 

ifz< >9then620 

forz=ito8:gosub830:wl=p(c)+ p(d)+p 
(e) 

ifwl=2thena=-cl(p<c)-l)-d#(p(d)-l 
> -e* <p( e ) - 1 ) s ifc (a)<>lthen6O0 
next 

ifz< >9then620 

a=int(rnd(1)*9)+1;ifc(a)=lorp(a)= 

11hen 610 
c < a)=1s goto 180 

pr int"CGROEN 3[2xspatie3UCCI UCCI 
IC2xspatie3UC4xspatie3UCCI UCCI U 
CC I I" 

print"C2xspatie3BC2xspatie3B BC2xspat 
ie3B B UKC4xspatie3BC4xspatie3BC2xspa 
tie3B BC4xspatie3B" 

print" [ 2x spat ie] l-CCK fCCH fCIC2xspati 
e3«. JCCI fCCK hCCC2xspatie3B" 
print"C2xspatie3BC4xspatie]BC2xspatie 
3 B B JI[7xspatie3B B[4xspatie]BC4xspa 
t i e 3 B " 

print"C2xspatie3KC4xspatie3KC2x spatie 
3J KC2xspatie3JC4xspatie3JCCK KC4xspa 
tie3JCCK JCKW" 

print"C2xneer][griis 3 3 b i j dit sp 
el speel je tegen de c-64" 
print"computer. het is de bedoeli 
ng om, om de" 

print"beurt een woord van de stap 
el te halen." 

print"[neer]nu gaat het er om .wie 
het eerst drie" 

print "woorden heeft die dezelfde 
letter hebben"; 

print"het maakt niet uit welke le 
tter dat is." 

print"Cneer 3bv. de woorden pak, p 
rei en spul heb-" 

print"ben alle drie de letter ’ p ’ 
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print"Cneer]je mag meer dan 3 woo 
rden pakken om aan" 

print"drie woorden met dezelfde 1 
etter tekomenC2xneer3" 

■for i = lto60: next: pr int" t o p 3 C G E E L 3 C 9 x 5 p 
atie]druk nu op een toets" 


," bus " 

950 data"itulesbo" 
*** EINDE LISTING *** 


790 

g e t a $ : ifa$<>""thenreturn 

pakspel 





800 

for i = 11 o 5 8 :next:print"[op 1 CGRDEN3 








C9xspatie3druk nu op een toets" 

regel 

1 

55 

regel 

230 

203 

810 

geta$:ifa$<>""thenreturn 

r eg e 1 

2 

4 1 

regel 

240 

241 

820 

g ot o7B0 

regel 

3 

36 

regel 

250 

228 

830 

c s q(z,1):d s q(z,2):e=q(z,3):return 

regel 

4 

143 

regel 

260 

220 

840 

data" pak ","denk ", "korst"," dia 

regel 

10 

78 

regel 

270 

42 


" , "prei " , "sint ","bral ", " elf " 

regel 

20 

105 

regel 

280 

1 90 


,"spul " 

regel 

30 

33 

regel 

290 

80 

850 

data"kilaespr" 

regel 

4 0 

10 

regel 

300 

32 

860 

data" las "," eva ", " ram " , " pil 

regel 

50 

54 

regel 

310 

195 


" , "reis "," min lor ","boek " 

regel 

60 

68 

regel 

320 

54 


, " mos " 

regel 

70 

60 

regel 

330 

1 1 1 

870 

data"aiolemsr" 

regel 

80 

136 

regel 

340 

34 

880 

data"kamp "," hek ","kroos"," via 

regel 

90 

216 

regel 

350 

75 


","prei ","huis ","flard"," vel " 

regel 

100 

78 

regel 

360 

245 


, "plons" 

regel 

1 10 

21 1 

regel 

370 

199 

890 

data"kilaespr" 

regel 

120 

194 

regel 

380 

20 

900 

data" bos ","slip ", "staf ","baan 

regel 

130 

198 

regel 

390 

182 


" ,"info "," nut ","beef ","ziek " 

regel 

140 

1 18 

regel 

400 

36 


,"toet " 

regel 

150 

153 

regel 

4 10 

249 

910 

data"snebitof" 

regel 

160 

38 

regel 

420 

35 

920 

data"wiek ","krik "," lok den 

regel 

170 

193 

regel 

430 

252 


","woord"," dal ","poes ","rups " 

regel 

1 80 

3 

regel 

440 

2 1 5 


, " wals " 

regel 

190 

30 

regel 

450 

193 

930 

data"kdserlwo" 

regel 

200 

175 

regel 

460 

49 

940 

data"bril ","meid ","kiosk","talk 

regel 

210 

160 

regel 

470 

18 


"„"boter"," tas ","mulo ","deun " 

regel 

220 

2 1 4 

regel 

480 

1 22 


i I 


: I 

Mi 

I 

I 




! 
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Insteekkaartjes 
voor C-64 


256K EPROMKAART (Nr. 832) ƒ 138,65 

Epromkaart voor 8 x 8K of 16K of 32K eprom’s 
De epromkaart is menu gestuurd + moduul-generator 
Men kan met deze moduul-generator programma’s voor 
de epromkaart genereren tot/met 44K (176 blocks) (mits 
ze uit 1 deel bestaan). 

Door gebruik te maken van deze moduulgenerator gaat 
er geen enkel byte geheugen verloren. 

Men kan deze gegenereerde programma’s via de direc¬ 
tory functie aanspreken. 

Verder nog vele andere functies. 

EPROMPROGRAMMER (Nr. 65) ƒ 165,96 

Epromprogrammer voor 2716 t/m 27256 eprom’s 
Drie programmeerspanningen 12V, 21V en 25V. 

De epromprogrammer wordt geleverd incl. software en 
Textoolvoetje. 

Software bestaande uit: 

1 Leegtest L Laad programma 

2 Eprom uitlezen M Monitor 

3 Programmeren G Genereren tot 16k 

4 Herhalen programmering $ Directory 

5 Vergelijk eprom R Retour menu 1 

6 Naar Menu II B Retour naar basic 

Geen schakelen van dipswitches, alles wordt in een run 
geprogrammeerd, geen schakelaars. Aansluiting op de 
userpoort, geen extra voeding. 


16K-RAMKAART (Nr. 250) ƒ 83,19 

Met deze kaart kan men alle programma voor eprom 
eerst uitproberen voordat men ze in eprom program- 
meerd. 8, 16K programma’s en kernals. Verder plaatsen 
van accu’s mogelijk, zodat men de programma’s lange 
tijd kan vasthouden. 


J', > 


Uppps 

■ .£ï 


IC-Tester (Nr. 260) ƒ 142,43 

De IC-Tester kijkt welke IC het is, en test of ze goed 
zijn (langduur test mogelijk). Alles menu gestuurd. De 74 
TTL serie. 


Epromkaart no.200 

ƒ 

23,10 

Universeelkaart no.210 

ƒ 

9,66 

Kernalkaart no.150 

ƒ 

37,82 

Kernalkaart + DR no.151 

ƒ 

46,21 

Kernalkaart 32K no 152 

ƒ 

32,35 

Hoekadaptor no.310 

ƒ 

18,90 

Userexpander no.300 ƒ 

ƒ 

27,31 

Cartridge-expander no.360 

ƒ105,04 

Epromwisser no.612 

ƒ 

49,57 

Moduulkastje no.1270 

ƒ 

6,30 


MODEM (Nr. 2100) ƒ 165,96 

Modem voor commodore 64. 

300 baud 

Answer en originate. 

Verder voor de meeste bestaande 
software geschikt. 

Wordt aangesloten op de userpoort. 

Let een echte MODEM!!! 

Bestellen bij GIMA PRINT-SERVICE 
(077-870937), Postbus 186, 5900 AD 
Venlo; v. Laerstr. 25, 5921 JG Venlo. 
Overmaken op bankrek. 45.77.59.739, 
girorek. 4848454. Of onder rembours. 
Alle prijzen zijn onder voorbehoud. 
Ook na 18.00 uur bereikbaar. 
Zat./Zondag gesloten. 


BEL 077-870937 


PRINT SERVICE 


PB 186 5900AD Venlo - Tel. 077-870937 
Postgiro 4848454 

Postbus 6685, Vossen laan 321 
6503 GD Nijmegen S* 080-560491 


Alle prijzen zijn excl. 

19% BTW en 
f5,- verzendkosten 


§11111 i w. 

























É J - ■. I \ ||pÉI| iMI ; «'i t w%9fm 11V|' fflÊm 

1 - m & «mI 9 % 1 M1 I 

j|^'^ ; 'H f|ff| f|| ; )?k\-': He ü 3181i 1 ^ÉlüiteÉÜi^ : ÉÜÉIHÉI ; * 

PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT • PRINT-OUT 


1 /.r'«k>'txX' 
^^pgjlp 

ttm 


MM 

I ■ ■-■ ‘ "., ■■ 

I l 'W$Ë& \ <& ' 


[ u ; 

'wm‘"‘- 

i , s 

. y | 

■■ :,>:; ; 


j * 


®?v 

pS®S : ®ii|i 

- 

«Ai. -i .... 3 


. ■ . 

SffiflfilIflSS 

I jjgii 

I 

I 

\ 

i 

I 

I 


! . 

WL^ÊÊ 

‘ tmm 


I; n ,>* , 

Hm -; - I 

mS * * ! ij 

3 


K 


mm 


i ■"■ is 


181 


l 










Wm 


m: 




mm 




; ;!£3tf 




lilii 


«st® 


Hïó;rp 


inl 




liilfi 






=8» 


. • 

: ÏMSÏ 


mm 


Ss 





n 


ab© s 


tell erl 


ABONNEMENTEN 
OUDE NUMMERS 


Abonnementen kosten ƒ 55,- en voor een vol 
jaar Commodore-lnfo (10 nummers) is het 
verreweg het gemakkelijkste, wanneer u dat 
bedrag aan ons overmaakt op giro 1585491 tnv. 
SAC Blaricum of op onze bank in België BBL 
nr. 310050602562 


OUDE NUMMERS 

Reeds verschenen nummers zijn na te bestellen. 
Maar, helaas, NIET per brief, kaart of telefonisch. 
We leveren die oude nummers alleen bij 
vooruitbetaling op onze giro 1585491. 


De prijs is ƒ 6,75 per nummer 
(dus aangeven welk nummer). 


Van de eerste jaargang, 1984, zijn alleen nog de 
nummers 2, 4 en 5 beschikbaar. In dat jaar zijn 
overigens maar vijf nummers verschenen. 
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Hokken 


><>A, 






WSM 




tsM* 4 




sss 


Hokken is een fraai spel voor de Plus4 en Cl 6 bezitters. Het is 
geschreven door Durk Bouma uit Nijland. De spelregels worden 
u door het programma zelf uitgelegd. U kunt het tegen iemand 
anders opnemen, maar mocht u gebrek aan een tegenstander 
hebben dan kunt u het tegen de computer spelen. U moet er wel 
even om denken dat als het speelveld op het scherm verschijnt, 
u zo’n vijftien seconden moet wachten alvorens te beginnen. 




. 




ISIS 




rem hokken / c16 en plus4 

rem door durk bouma 

rem uit nijland / 05156-550 




rem 
rem * 
*** t * 

print 
,8,7! 
12,20 
forf* 
) : nex 
r e s u m 

) *40! 
r < 3) = 
cr (4) 
x (4) * 


**************************** 


chr$(B)chr$(142) svolB:color0 
color4,8,4scdlorl,5,3!dimcc < 
) 

11o8ikeyf, "s y s 6 2 116" + chr$ ( 13 
t s t r ap 8 

enextscz (1>= — 40 s cz (2)=1:cz (3 
cz(4) B -lscr(l) a -40ïcr(2)*0 ïc 
40 

«Osex(1)=0:cx(2)=1s cx(3)=0sc 
-1 :na*(3)="gelijk spel" 


10 1 (1):=10:1 (2) =20: 1 (3)=40:1 <4> =60: m 
(1)=262« m (2)=345:m (3)=383:m (4)=45 
3 

11 m(5)=516:m(6)=571 

12 cy(l)=—l:cy(2)=0:cy(3)=l:cy(4)=0 

13 print" L 2xHOME 3 CCLR-HOME3Cneer]C6xrech 
ts]C4xspatielh o k k e n 

14 pr int" H6xrechts3================= 

= = = = = = = = ="t char, 1,4, ""sprintchr$( 

27) "t " 

15 print"ClBxneer]"tab(3B)chr* (27) " b 
C HOME 3" 

16 pr infdoB om de beurt een zet- he 
b je een 

17 print"vierkantje gemaakt, dan kri 
jg ie eenC2xspatie3punt. 

18 print"Cneer3beweeg mets / = recht 

s":printtab (13) = links 

19 printtab (13) "a = boven":printtab( 

13)"z = beneden 

20 print"Cneer3als je een streepje z 
et beweeg ie 

21 print"eerst de twee aanwijzers <Z 
) naar hun 

22 print"plaats en druk je op spatie 


23 print"hoor je een lage toon dan i 
s deze zet 

24 print"niet toegestaan. 


HÉ 

m, 
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25 print"[neer 3 voer grootte van het 
veld in: 

26 input“horizontaal (2-19)";ho:ifho 
>19orho<2then26 

27 i nput " ver t i kaal ( 2 - 11 ) "jve: i-fve>l 
lorve<2then27 

28 print"C neer 3 aantal spelers (0, 1 

of 2 )"? 

29 getkeyg$:g = val<g$):ifg>2then29 

30 printg:na$( 1 )«"commodore 16":na*< 

2)«na*(1) 

31 ifg=0then37 

32 ifg= 2 thenforf* 1 to 2 :input"Cneer3na 
am";na*(f):next:goto37 

33 print"Cneer 3wi 1 ie beginnen <i/n) 

" 5 

34 getkeyg*: i-f g* s " j “thenf *1 : goto36 

35 ifg*="n"thenf«2selse34 

36 printg*:input"Cneer 3naam";na*(f) 

37 forf=lto3siflen(na*(f>)=>20thenna 

* (f)=1ef t♦<na* <f), 20) :goto39 

38 f org = len(na* <f) )tol9:na*(f)=na*(f 

) + " " : n e x t 

39 next:print"Cneer 3k1 oppen de gegev 

ens ( i /n) "5 

40 getkeyg*;ifg*="n"thenrun 

41 ifg*< >"j"then40;elseprintg* 

42 forf=204Bto3071:ifpeek<f+1024)<>3 
2thensound2,990,1 

43 pokef,119:next:color1,8,7 

44 print" C2xHOME3CCLR-HOriE3 r "jtfor 

f = 1 toho -1 : pri nt " -r :next;print"i " 

;forf= 1 tove -1 

45 printsprint" I* " 5 : f org = 11 oho-1 : pr i nt 
"4 :next:print"H ":next:print 

46 print" *■ " ;:forf = ltoho-l:print"- L " 

; :next:print" J " :y=3072:ei=ho*ve 

47 tv =(ve*2+l)*40+3032:x=tv+41:th=tv 
+41+ho*2:pokex,90:pokey,90:ah=ho* 

2+1 

48 ov=ve*2+l!forfs52048to3071sifpeek ( 
f+1024)<>32thensound2,980, 1 

49 pokef,52:next;colorl,5,3:goto52 

50 rem ********** spel ************* 

* 

51 sound 1,750,40:sound2,500 9 40:gotoS 
6 

52 forfo-lto2 

53 char,1 9 24 9 "stand: 

54 iffo=lthenprint""pu(1)"Clinksl 
-"pu(2)" "na* <fo )5 1 goto56 

55 pr intpu ( 1 ) “ Cl inksl — " pu (2) 11 "na 
* (f o ) ; 

56 ifna*(fo)="commodore 16C8xspatie3" 
goto100 

57 getkeyg*:ifg*="a"thenr=-40:goto62 

58 ifg*="z"thenr«40:goto62 

59 ifg*="/"thenr=1:goto64 

60 i f g * = " ."thenr=-l:goto64 

61 ifg*=chr*(32)then66:else51 

62 ify+r<3072ory+r>tvthen51 

63 sound!,700,2:pokey,32:y=y+r:pokey 
, 90:gato57 

64 ifx+r>thorx+r<tv+41then51 

65 sound 1,700,2:pokex,32:x=x+r:pokex 
,90:got o57 

66 gosub68:gosub69:ifc<>1then51 

67 gosub73:goto80 

68 a=int(<y-3072)/40):c=x-3072:b = c-< 

int(c/40)*40):p=3072+b+a*40:c«0:returi 

69 ifpeek(p)< >32andpeek(p)<>96thenc= 

0:return 

70 pe s peek(y+1):ifpe=32orpe=96orpe=6 
6thenc=c+1 

71 pe-peek (x-40) : ifpe=32orpe=96orpe= 
67thenc=c+1 


100 


101 


102 

103 

104 

105 

106 

107 

108 

109 

110 

111 

112 

113 

114 

115 

116 

117 

118 


return 

forf=lto4:z <f)«0:next 

ifpeek(p+1)=32orpeek(p+l)=96orpeek 

(p+1)=160thenpo=1:el sepo«0 

gosub 121: ifpo as lthen7B 

c(l) =-*80: c <2) =-*39: c (3) =-41 : cp=-40 

:gosubS 1 

c(1)=80:c(2)=41:c<3)=39:cp=40:gosub 
81:return 

c(1)=-39:c <2)=41s c(3)=2:cp = 1:gosub 
81 

c<l)=-2:c(2)»-41:c(3)=39:cp«-l:gosub 
81:return 

ifcn=0thennextfo:goto52:elsecn=0: 
goto53 

c 0 = 0 ï f orf = 1to3:ifp+c(f)<3072thenretur 
forf B lto3;ifpeek <p+c(f))<>32andpeek 
(p + c (f) )<>96thenco = co+l 
next 

ifco=3thenpokep+cp-1024,48*fo+135 
: po-kep + cp 9 102 :pu(fo)=pu(fa)+l:cn = 

1 :elsereturn 

forf = 100to900step20:sound 1,f,2;sound 
1 9 1000-f,2:next:pokep+cp,160 
ifpu(l)+pu( 2 )<>eithenreturn 
rem ******** einde spel ********* 

** 

forg=ltol0:getg*:next:char 9 1,24," 
stand: " 

ifpu(l)>pu( 2 )thenf=lsprint""pu (1 
)"-"pu(2);:goto92 

ifpu (2) >pu<l)thenf=2:elsef=3:print 
p u(1) "-"pu(2) 5 :g ot o92 
printpu(l)"-"p u < 2 ) ; 
print""jna*(f); 

dat a4 9 2 9 4 9 2 9 4 9 2 9 4 9 2 9 2 9 2 9 2 9 2 9 2 9 3 9 6 
9 2,6,2 9 5 9 2 9 5 9 2,4 9 4 9 1,2 
data 4 , 2 ,4,2,4,2,4, 2 , 2 , 2 , 2 , 2 , 2 ,3 ,6 
, 2 , 6 , 2 ,5, 2 ,5, 2 ,4,4, 1 , 1 , 1 , 1 
data4,2,4,2,4,2, 1, 1, 1, 1,2,2,2,2,z 
, 3 , 2 , 1 , 2 , 1 , 2 , 2 , 2 , 1 , 2 , 1 , 2,2 
dat a4, 1,4,1,4, 1,4, 1,4,2,4,2 
data4,2,4,2,4,2,4,2,2,2,2,2,2,3,6 
, 2 , 6 , 2 ,5,2,5,2,4,4,1,2,, 
readm,1:ifm=0thenrestore:goto98 
sound2,m(m),1(1):forf=ltol(1)*15: 
next:getg*:ifg*=""then9B:elserun 
rem ******** besturing c-16 ***** 

* * * 

ab= 0 ;bl=l:b 2 -l:t= 0 :o(l)=xïo( 2 ) -y : 
f ar ij- ltove: f org = ltoho: ifcc (f,g)=3 
then115 

ifcc <f,g)< 2 thent = t + l 
nex t:nex t 

ab=ab+l:tx=int(rnd( 0 ) *ho+l):ty=int 

< rnd( 0 )* ve+ 1 ) 

ifab<200thenl08 

foral=bltove:f ora2 = b2toho: ifcc(al 
,a2)>lthertnext:next:t=0:gotol08 
b 1 =a 1 :b 2 =a 2+1 

ift=0thenforf=lto4:gotolll 
ifcc (ty,tx) >lthenl04 

forf = lto4:ifcc(ty+cy(f),tx+cx(f) ) 
>lthennext:goto!04 

x=tv+40+2*tx+cx(f):y=80*ty+3032+c 
r(f) : iff = lorf=3thenpo = 0:elsepo=l 
gosub 68 :pe = peek(p) : ifpe< >32andpe< 
>96thennextf:gotol04:elsel 13 
gosubl25:gosub121: cn=0: goto80 
rem computer maakt een punt 
y=80*f+3032:x=tv+40+2*g:gosub68:for 
f = lto4spe=peek(p + cz (f)) 
ifpe<>32andpe<>96thennext 
iff=lorf=3thenpo=0:elsepo=l 
cp = —cz(f):y = y + cr(f):x = x + cx (f):gosub 
68 










■ 


:■ 

! 

c: . ; - 

x> ■■$?;;■ 

£&^?#«r ; 

v/ ■ ■ '■■“'" ' : 'v 

I 


119 

120 
121 

122 

123 

124 

125 

126 
127 


128 


gosub1 
80 

rem st 
sound 1 
tv-40) 
pokep, 

) +1: cc 
pokep, 
)+1icc 
rem be 
n(1)=x 
•f ) then 
i f f =2t 
■f or g = o 
1,300, 
snext 
poken( 


25:go5ubl21:co a 3:gasub84: goto 

reepje + byhouden aantal 
, 1,25:ry=(y-3032)/80s ko=( m~ 

/2i i-f po = 0then 1 23 

66:cc<ry,ko+.5)-cc(ry,ko+. 5 

(ry,ko-,5)=cc(ry,ka-.5)+1:return 

67! cc(r y +. 5,ko)*cc(ry+.5, ko 

(ry-.5,ko)=cc(ry-.5,ko)+1sreturn 

wegen van "Z" door c-16 

s n (2) =y : -f or-f = 1 to2; i -f n ( f ) >o( 

s=1:elses=-1 

hens=s*40 

(■f ) ton < -F ) steps: pokeg , 90: sound 
2sforh=ltol50:next:pokeg,32 

■f) ,90:next:return 


*** EINDE LISTING *** 


hokken 

regel 
regel 
regel 
regel 
regel 
regel 
regel 
r eg e 1 
regel 
r eg e 1 
regel 


51 

109 

120 

143 

35 

176 

153 

185 

228 

163 

126 


regel 

12 

97 

regel 

13 

243 

regel 

14 

240 

regel 

1 5 

96 

regel 

16 

105 

r eg e 1 

17 

250 

regel 

18 

3 

r eg e 1 

19 

178 

regel 

20 

166 

regel 

21 

50 

regel 

22 

107 


regel 

23 

61 

regel 

58 

128 

regel 

24 

4 

regel 

59 

36 

regel 

25 

238 

regel 

60 

206 

regel 

26 

178 

regel 

61 

173 

regel 

27 

7 

regel 

62 

204 

regel 

28 

157 

regel 

63 

1 1 1 

regel 

29 

186 

regel 

64 

169 

regel 

30 

168 

r eg e 1 

65 

107 

regel 

31 

197 

regel 

66 

219 

regel 

32 

124 

regel 

67 

34 

regel 

33 

2 

regel 

68 

22 

regel 

34 

113 

r eg e 1 

69 

48 

regel 

35 

129 

regel 

70 

130 

r eg e 1 

36 

186 

regel 

71 

182 

regel 

37 

44 

regel 

72 

142 

regel 

38 

16 

regel 

73 

75 

regel 

39 

243 

regel 

74 

223 

regel 

40 

170 

regel 

75 

126 

r eg e 1 

41 

6 

regel 

76 

212 

regel 

42 

236 

r ege 1 

77 

240 

r eg e 1 

43 

121 

regel 

78 

106 

regel 

44 

0 

regel 

79 

136 

regel 

45 

212 

regel 

80 

147 

regel 

46 

188 

regel 

81 

124 

regel 

47 

48 

regel 

82 

183 

regel 

48 

208 

regel 

83 

130 

regel 

49 

104 

regel 

84 

160 

regel 

50 

179 

regel 

85 

197 

regel 

51 

40 

regel 

86 

171 

regel 

52 

207 

regel 

87 

70 

regel 

53 

45 

regel 

88 

223 

regel 

54 

48 

r eg e 1 

89 

161 

regel 

55 

20 

regel 

90 

1 46 

regel 

56 

64 

regel 

9 1 

22 

r eg e 1 

57 

81 

regel 

92 

31 


Een Nederlandstalig boek (168 
pag.), waarmee u niet alleen inzicht 
krijgt in wat er met Basic 3.5 alle¬ 
maal mogelijk is, maar ook veel bre¬ 
dere computertoepassingen be¬ 
handeld worden en randapparatuur 
en software uitgebreid aan de orde 
komen. 

Het onmisbare boek 
voor iedere C-16 
bezitter, compleet met 
vele 

programmavoorbeelden, 
zoals een klein 
tekstberwerkings - 
programma. 


VAN START MET 


DE C-16 





IN BASIC 3.5 




ff> % % % % /: 7 ^ 

*. Door Luc Sata en Olaf Simoné 

% 1 


VOOR DE C-161 
ook bruikbaar 
voor PLUS/4 


Prijs 


ƒ 27,50 

plus ƒ 3,~ 
verzendkosten 


Te koop bij Filmpost, Gameworld, 
Galimero, Verwijs en Stam, Collec¬ 
tief, PC-shop, Radiobeurs, Cafka. 


Van start met de C-16 in Basic 3.5 


Direkt te bestellen bij: 

Infolist, Ceintuurbaan 5, 

1271 BE Huizen. 

Alleen levering na vooruitbetaling 
van ƒ 30,50. 

Gironummer 3157656 tnv. Infolist, Huizen 
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Wijzerplaat 
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- In het vorige nummer plaatsten wij een tweetal listings voor de 
C-128. Deze listings blijken echter ook op de C-16 en Plus/4 te 
draaien. We moeten er echter wel uitdrukkelijk bij zeggen dat 
dat lang niet altijd het geval zal zijn met 128 listings. Het 
programma bijtijds tekende een klok op het scherm en daar het 
vergelijken van twee verschillende programma’s die hetzelfde 
doen erg aardig is, plaatsen we nu weer een dergelijk pro¬ 
gramma. Dit programma werd echter speciaal voor de C-16 en 
Plus/4 geschreven. Mocht u uw kinderen het klokkijken bij willen 
brengen dan vormen deze programma’s een handig en eigen¬ 
tijds hulpmiddel. Wilt u programmatechnisch het een en ander 
leren dan kunt u ook aan de slag met deze programma’s. 


■ 

, . . 




Infolist 


=rdv.fe 


Uil I 

s ¥„ i.ïi- 


. 

■ ÜsS ifü . : 
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■ : • . ; 
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Onze lezersservice Infolist heeft een speciale cassette 
samengesteld waarop uitsluitend C-16 programma’s 
zijn te vinden. 

Allereerst natuurlijk de nieuwe Checksum.C-16 en 

Visi.C-16, maar daarnaast ook een aantal listings, die in 

' 

de voorgaande nummers xijn verschenen, listings uit dit 
nummer en ook nog een aantal niet eerder gepubli¬ 
ceerde listings. Kortom, een waardevolle tape voor 

beginners én gevorderde C-16 computeraars. Daar- 

■ 

naast zijn de programma’s natuurlijk ook allemaal 
geschikt voor de Plus/4. 

De tape is - net als alle andere Infolist produkten - te 
bestellen door ƒ 24,50 (voor de diskette ƒ 29,50) over te 
maken naar giro 3157656 t.n.v. Infolist, Huizen. 

Na ontvangst van uw betaling wordt de tape/diskette 
naar U opgestuurd. Vermeid bij bestellen wel duidelijk: 
C-16 tape of C-16 diskette. 
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Ghostrunner 


Werd er in het spel Ghostbusters nog heldhaftig op spoken 
gejaagd, dan wordt hier, met het spel Ghostrunner, de werkelijk¬ 
heid toch dichter benaderd. Uw opdracht: maak je onopvallend 
en zo snel als je kunt uit de voeten als je een spook tegenkomt. 
Een waarlijk schitterend programma van Frank en Erik van de 
Pol. Je hebt drie levens om zoveel mogelijk punten uit het 
doolhof te eten. Als je het spel, dat je door middel van de 
cursortoetsen speelt, een beetje onder de knie krijgt, moetje je 
niet al te zeer verheugen. Naarmate jij je verbetert wordt het 
spookje sneller. Er zijn maar liefst drie niveaus ingebouwd. 
Verder kun je ook nog een bonus verdienen als het spook over 
een gekleurd blok loopt. Fraaie grafische beelden en mooie 
geluidseffecten maken dat dit spel een aanwinst is voor uw 
softwareverzameling. 



ywtwot 8 <> 


O cl r 

1 v □ 1 5 

2 gk s rnd (-t i ) 

3 rem ghost runner / c-16 

4 rem door -frank van de pol 

8 rem <c) mcmlxxxv 

2 t r ap 216 

3 pr intchr$(8) 

4 colarO, 5,0: color4, 1 ! col'or 1 , 14 

5 gosub2Ó4 

6 hi*Öi ic"0 

.7 if sc>hithenhi=sc 
.8 val 6: sc = 0 ïrestore 
.9 gosub140:1=3 
p =3072 

ï1 co1or4,1:co1or1,7,0 
ü2 gosub57sgosub135 

ï3 printchr$(8)chr$U42) i col or 1,7,0 
>4 x=liy=l!a=38:b=18:c=46!charl,x,y f 

« S " 

Ï5 forz=ltosj 

16 geta$: ifa$< >"Cl inksl"anda$<>"Crechts]" 
anda$<>"Cop]"anda$<>"Cneer3"then3 

8 

17 ifa$="Cop]"andpeek< <y*40)+x-40+p> 

< >91thenchar1,x,y, " ";y = y-l:goto3 

1 

> S i f a $ - " [rechts] 2 3 4 5 6 * 8 * * 11 andpeek ( (y*40)+x + i 
+p)<>91thencharl,x,y," ":x=x+ligota 


29 i f a $ ="Clinksl"andpeek(<y*40)+x-l+ 
p)<>91thencharl,x,y," ":x=x-l:gota 
31 

30 ifa$="Cneer]"andpeek((y * 4 0)+X+40+ 
p)<>91thenchar1,x,y," "!y=y+l 

31 i-fpeek( (y*40)+x+p)=46thensc=sc+ls 
ht=ht+l: sound 1,810,5 

32 char1,x,y,"CROGD3S" 

33 if a=xandb=yandim=0then53 

34 charl,12,22,chr$(18)+"CZ WART 3"+str* 
(sc)+chr$U46) :colorl,7,0 

35 if ht=357thengoto200 

36 if sc/200=int(sc/200)andsi>2thens 
j = s j - 1s sc—sc + 10 

37 if sc=hithengosub198 

38 next:if c«911henchar 1,a,b,"4" 

39 if c“46thenchar1,a,b,"." 

40 if c=32thencharl,a,b," " 

41 if c=90thenchar1,a,b,"Z" 

42 poke<<b*40)+a+2048),kl 

43 i fa<xthena = a+1 

44 ifa>xthena=a“l 

45 ifb<ythenb=b+l 

46 ifb>ythenb-b-1 

47 c=peek(< b * 40)+ a + p >sifc=90thensc=s 
c + 25 

48 kl=peek< (b*40)+a + 2048) 

4? charl,a,b,"X" 

50 if a=xandb=ythen53 

51 goto25 

52 goto52 

53 fort = ltol0« forx«28to31ipoke65286, 
xsnextsforx=31to27step-l:poke6528 
6, x 

54 next;sound3,960-(t*5),6snext 

55 1=1 — 1: if1 =0thengoto 17 

56 gosub135:goto20 

57 if b z = 1th en 62 

58 restoreacolorl,2,lsforq“ltol60sread 
h,tescharl,h-l,te,"CRVS-aan3 CRVS-uit 
]"!next 

59 restore:colorl,2,5:forq=ltol60iread 

h,te* char1,h-2,te-1, "CRVS-aan 3 CRVS-u 
it3"inext 

60 forq=1005tol020isound3,q,5snext 

61 forq=ita25sprint"CZWART3CRVS-aan3 

i i i a ■ ■ t « ■ • i i i ■ i i I i i i i i i i i i i I I I I I I 


4444444C RVS —ui t 3":next 

62 ht=l!poke65286,1:gk=int(rnd(1)#3) 

!color0, 8 :print"CCLR-HOME3" 5 :bz=0 

63 if gk=lthen86 

64 if g k = 21 h en 108 

65 sj*10sht=0sc=46 

66 print"444444444444444444444444444 
4444444444444" 

67 pr int "4... 

.4" 

68 print"4.44444444.4444444444444444 
44.44444444.4" 

69 print "4. 4.4. . . 4. . . . 4. . . 4 

.. 4. 4" 

70 print"4. 44444444.4.4.4.4.44.4.4.4 
.4.44444444.4" 

71 print "4.4. ..4... 44. . . 4. . 

.4. ......... 4" 

72 print"4444444.44444444.444444. 444 
44444.4444444" 

73 p r i n t " 4.4. . . 4. . 444444. . 4. 

. . *f......... -f 

74 print"4.44444.4.•.4.4.44444444.4. 
4..■4.44444.4" 

75 print"4.44444.4.4.4.4.444.4. 

4.4.4.44444.4" 

76 print"4.44444.4.4.4.4.444. • • • ■ ■ 4. 
4. 4. 4. 44444.4" 

77 print"4.44444.4...4.4.44444444•4. 


1111 is 1 sii ■ -111 s ■ § fflaiiiiiiiiiiii 11 ss 11! i 

•V .,.••• . - . . .... . 
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... 


. 

WêêM' 1 '' 


5 

r 

• I 


I 

hBI 1 

%■<&&: 


..4.44444.4" 

78 print 1 '4.4.. . 4. . 444444. . 4. 

. . 4.4" 

79 print"4444444.44444444.444444.444 
44444.44H—K444" 

80 p r i n t " 4.4. . . 4. . . 44. . . 4. . 

.4.4" 

81 print"4.44444444.4.4.4.4.44.4.4.4 
.4.44444444.4" 

82 print" 4.4. ....... ..4. „.4. ...4. ..4 

..........4.4" 

83 print"4.44444444.4444444444444444 
44.44444444.4" 

84 print"4 ... 

.4" 

4444444444444":c = 46:goto 131 

4444444444444" 

87 print"4 .é.. ......... ... 

.. . 4" 

444444444.4.4" 

89 pr int "4... 

............ 4" 

90 print"4.4.4.444444444444444444444 
4444444.4.4.4" 

91 print "4.4.... 

«.«.....,.4.4" 

92 print"4.4*4.4.4444444444444444444 
44444.4.4.4.4" 

93 print "4.4.4 .... 

.4.4.4" 

94 print"4.4.4.4.4.44444444444444444 
444.4.4.4.4.4" 


Speciale service voor C-16 bezitters 


Uitbreidings-unit 
voor de C-ló 

uitbreidingsmodules voor de C-16, waarmee 
de geheugencapaciteit tot 64 KB is uit te breiden. 

MCT 64K RAM BOARD 

Deze uitbreiding moet achterin de C-16 worden inge¬ 
bouwd (met montagevoorschrift)en laat dus de car- 
tridge sleuf vrij voor andere software. Alle C-16 
software blijft bruikbaar, maar ook de Plus/4 software 
kan nu gebruikt worden. Er is met de MCT 64K maar 
liefst 48 KB vrij in de High-Res mode (normaal 2 KB) en 
een enorme 60.5 KB vrij RAM voor Basic programma's. 




nu in prijs 

verlaagd: 


ƒ 239, 


incl. BTW 
en verzendkosten 

▼ Te bestellen door overmaken van dit bedrag op 
giro 3157656 tnv. Infolist Huizen met vermelding 

MCTG4K. Inl. 02152-62343 




100 


101 


102 


104 

105 

106 

107 

108 


print"4.4.4.4.. . ... 

• . . ■ . .4.4.4,4" 

print"4.4.4.4..... 

■ . . m • .4.4.4. 4" 

print"4.4.4.4.4.44444444444444444 
444. 4. 4. 4. 4. 4" 

print"4.4.4. .... 

.4. 4. 4" 

print"4.4.4.4.4444444444444444444 
44444.4.4.4.4" 

print"4.4.................. 

.. 4. 4" 

print"4.4.4.444444444444444444444 
4444444.4. 4. 4" 

print" 4..... 

.4" 

444444444.4.4" 

print" 4... 

.4" 

print"444444444444444444444444444 
4444444444444" 
ht=-50 
sj=9:g ot o131 

print"444444444444444444444444444 


109 print "4, 


1 10 


1 1 1 


1 12 


1 13 


1 14 


1 15 


1 16 


1 17 


1 18 


1 19 


120 


121 


122 


124 

125 

126 

127 

128 

129 

130 

131 


132 

133 

134 

135 


print"4.4444.4.4.4.4.4.4.44.4.4.4 
. 4. 4. 4. 4444. 4" 

print" 4.4. • • , 4. 4. 4. 4* 4. 4. 44. 4» 4. 4 
■ 4. 4. 4. ... 4. 4" 

print "4. 4. 44 «4.4. • • . . • *4. . . «4. 

. . .4.4. 44. 4.4" 

print"4.4.44.4.444444444444444444 
4444. 4.44.4.4" 

pr i nt " 4.4. 

.4.4" 

print"4.4444•444.44444.44..44.444 
44.444.4444. 4" 

print" 4. . . . . . . . 4.4. .4. .4. .4. . 

... 4..4" 

print"4.44.444.44444.44.4..4.44.4 
4444.444.44.4" 

print"4. 44. 444.44444.44.4..4.44.4 
4444.444.44.4" 

print "4. . . . . . . .4.4. .4. .4. .4. . 

... 4.4" 

print"4.4444.444.44444.44..44.444 
44.444.4444. 4" 

pr int "4.4. 

.4.4" 

print"4.4.44.4.444444444444444444 
4444.4.44.4.4" 

pr i nt " 4. 4.‘44. 4.4..4. ...4.... 

. . .4.4. 44. 4.4" 

print" 4.4. ■ • .4.4.4.4.4.4. 44.4.4.4 
.4.4.4. . . .4.4" 

print"4.4444.4.4.4.4.4.4.44.4.4.4 
. 4. 4.4.4444.4" 

print" 4..... 

. 4" 

4444444444444" 
h t =-38 
s j = 1 O 
c = 46 

•forx=3872to4071 : pokex-1024,0: poke 
x, 160s nexts charl,5,22, "C ZWART 3CRVS- 
aan]score=>CRVS“uit]" 
.harl f 5,23,chr$(18)+"CZWART 3high 
=>"+str$(hi)+chr$(146) 
char1,3,3, "CPURPER 3 Z"icharl,36,3, 
"Z":charl,3,16,"Z"ichar1,36,16,"Z" 
gosubl35s poke65286,27s return 

i-fl=2thencharl , 35,22, "CGROEN3XCROOD 3 

SS" 








. 
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CRD0D3SSS" 

CGROEN3XXCROOD3 


181 sound 1,262,te 

182 soundlp169,te 

183 fioundl,118,te 

184 sound 1,854,tessound2,7,te*4 

185 sound 1,770,te 

186 sound 1,798,te 

187 soundl,810,te 

188 sound 1,798,tes sound 2 ,345,te*4 

189 sound 1,834,te 

190 sound 1,810,te 

191 sound 1,798,te 

192 sound 1,810,tessound2, 169,te 

193 sound 1,834,te:sound2,262,te 

194 sound 1,798,tessound2, 118,te 

195 sound 1,810,tessound2, 196,te 

196 sound 1,770, 128s sound2,7,128 

197 return 

198 ^orre*ltolOiforq*400to700itep20+r 
e:sound 1 ,q, lssound 2 , 1100 -q, lsnext 
s n ex t 

199 :sc=sc+l:return 

200 -fora = lto500s s s s s s e s s s scolor4,7s s s 
s s : s ! s i s s s scolar4, ls : s s s rsoundl, 1 
000 -a, 1 

201 nextsif l<3thenl«l+l 

202 sc=sc *2 

203 goto20 

204 print"CCLR-HOMED"chr$(14)»a$="... 


138 if 1 =0thenchar 1,35,22, M CGROEN3 XXX” 

139 return 

140 print"CCLR-HÜME3"chrf(142) s color 4 
, lscolor0,5,2:colorl, 1 

141 char1,16,3,"CWITIthis guy;"scharl 
, 20,5, "X" s *farq = lto500stepi0: sound 
1,500+q,1 

142 sound2,500-q,1!next:char1,12,10," 
wants to kill the" :-f orq = 600to900s 


C ROOD 3 4-M—M- 


-M-" s nex t 

149 restorei colorl , 2, lsforq=ltol60:read 
h,teichar1,h-1,te, "CRVS-aan 3 CRVS-uit 
]":next 

150 restorescolori,2,5sforq=ltal60:read 
h,tes charl,h - 2,t e -1, "CRVS-aan] CRVS-u 
it] " snext 

151 data6 1 2 l 5 I 2,4,2,3 t 2.3.3.3.4.3.5.3 


power-soft..proud 1 y pres 
.**.GHOST-RUNN 


153 datal1,6,11,7,11,8,11,9,14,5,13,5 
,13,6,13,7,13,8,13,9 

154 datal4,9,15,9,16,9,16,8,16,7,16,6 
, 16,5, 15,5,21,5,20,5, 19,5, 18,5 

155 datal8,6,18,7,19,7,20,7,21,7,21,8 
,21,9,20,9,19,9,18,9 

156 data23,3,23,4,23,5, 23,6,23,7,23,8 
,23,9,24,9,25,9,26,9,26,8,24,6 

157 datal0,20,10,19,10,18,10,17,10,16 
,10,15,10,14,10,13,10,12,11,12,12 
,12,13,12 

158 datal4, 12,14, 13,14, 14,14, 15, 13, 15 
,12,15,11,15,12,16,13,17,14,18 

159 datal4, 19, 14,20, 16, 16, 16, 17, 16, 18 
,16,19,16,20,17,20,18,20 

160 datal9,20, 19, 19, 19, 18, 19, 17, 19, 16 
,21,20,21,19,21,18,21,17,21,16 

161 data22,16,23,16,24,16,24,17,24,18 
,24,19,24,20 

162 data26,20,26,19,26,18,26,17,26,16 
,27,16,28,16,29,16,29,17 

163 data29,18,29,19,29,20,34,16,33,16 
,32,16,31,16,31,17,31,18,31,19 

164 data31,20,32,20,33,20,34,20,32, 1B 
,33, 18,34, 18,36,20,36, 19 

165 data36, 18,36, 17,36, 16,37,16,38, 16 
,39,16,39,17,39,18,38,18,37,18 

166 dat a38, 19,39,20 

167 te- 6 ibz=l 

168 sound 1,854,tessound2,7,4*te 

169 sound 1,770,te 

170 sound 1,798,te 

171 soundl,810,te 

172 soundl , 798,tes sound2,345,4*te 

173 sound 1,834,te 

174 soundl.810.te 


207 l=len(a$)-40s-Forq«itolscharl,0,13 
,mid*(a*,q,39)ichar1,O,ll,mid$(a$ 
j q» 39) 

208 colorl,5,3scharl,0,12,mid$(a$,1-q 
+1,39):color1, 6 ,5 

209 fort = lto50s next 

210 if q =761 h en 212 

21 1 nextiprintchr*(147)chr$(142) sreturn 


214 sound3,1000-t,3:if peek(1347)=7then 
t = 1 00 

215 nextigoto211 
21 /j résumé 

217 rem 

218 rem ghost-runner / c 16 

219 rem frank en erik van de pal 

220 rem uit ooirle / 013-342839 


*** EINDE LISTING *** 


r unner 


156 
16 
152 
244 
1 42 
47 
170 
47 
1 12 
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r eg 

28 

243 

reg 

104 

r eg 

29 

1 17 

reg 

105 

r eg 

30 

245 

reg 

106 

reg 

31 

58 

reg 

107 

r eg 

32 

121 

reg 

108 

reg 

33 

8 

reg 

109 

r eg 

34 

30 

reg 

1 10 

reg 

35 

58 

reg 

1 1 1 

reg 

36 

174 

reg 

1 12 

reg 

37 

58' 

reg 

1 13 

r eg 

38 

132 

reg 

114 

reg 

39 

27 

reg 

1 15 

reg 

40 

232 

reg 

116 

reg 

41 

198 

reg 

117 

reg 

42 

177 

reg 

118 

reg 

43 

141 

reg 

1 19 

reg 

44 

140 

reg 

1 20 

reg 

45 

145 

reg 

121 

reg 

46 

144 

reg 

1 22 

reg 

47 

73 

reg 

123 

reg 

48 

98 

reg 

124 

reg 

49 

52 

reg 

125 

reg 

50 

225 

reg 

126 

reg 

51 

240 

reg 

1 27 

reg 

52 

240 

reg 

128 

reg 

53 

43 

reg 

129 

reg 

54 

227 

reg 

130 

reg 

55 

177 

reg 

131 

reg 

56 

75 

reg 

132 

reg 

57 

25 

reg 

133 

reg 

58 

193 

reg 

134 

reg 

59 

162 

reg 

135 

reg 

60 

146 

reg 

136 

reg 

61 

255 

reg 

137 

reg 

62 

170 

reg 

138 

reg 

63 

21 

reg 

139 

reg 

64 

65 

reg 

140 

reg 

65 

1 

reg 

14 1 

reg 

6 6 

21 

reg 

142 

reg 

67 

103 

reg 

143 

reg 

6 8 

97 

reg 

1 44 

reg 

69 

1 17 

reg 

145 

reg 

70 

249 

reg 

1 46 

reg 

71 

1 17 

reg 

147 

reg 

72 

97 

reg 

148 

reg 

73 

4 1 

reg 

149 

reg 

74 

159 

reg 

150 

reg 

75 

152 

reg 

151 

reg 

76 

152 

reg 

152 

reg 

77 

159 

reg 

153 

reg 

78 

41 

reg 

154 

reg 

79 

97 

reg 

155 

reg 

80 

1 17 

reg 

156 

reg 

81 

249 

reg 

157 

reg 

82 

1 17 

reg 

158 

reg 

83 

97 

reg 

159 

reg 

84 

103 

reg 

160 

reg 

85 

6 

reg 

16 1 

reg 

86 

21 

reg 

162 

reg 

87 

103 

reg 

163 

reg 

88 

97 

reg 

164 

reg 

89 

103 

reg 

165 

reg 

90 

7 

reg 

166 

reg 

91 

193 

reg 

167 

reg 

92 

173 

reg 

168 

reg 

93 

27 

reg 

169 

reg 

94 

83 

reg 

170 

reg 

95 

1 17 

reg 

17 1 

reg 

96 

117 

reg 

172 

reg 

97 

83 

reg 

173 

reg 

98 

27 

reg 

174 

reg 

99 

173 

reg 

1 75 

reg 

100 

193 

reg 

176 

reg 

101 

7 

reg 

177 

reg 

102 

103 

reg 

178 

reg 

1 03 

97 

reg 

179 


103 

21 

94 
224 
21 
103 
69 
55 
131 
173 
193 
83 

1 17 
249 
249 
1 17 
83 
193 
173 
13 1 
55 
69 
103 
21 
100 
176 

95 
69 
118 
130 
95 
191 
157 
1 95 
1 7 1 
1 42 
144 

241 
10 1 


163 


77 

234 

171 
130 
100 
193 
162 

234 
1 17 
206 
209 
24 1 
208 
200 

172 
161 
20 B 
88 
193 
214 
152 
0 

170 

58 

235 

154 
164 
149 
87 

155 
1 49 
164 
232 
164 
1 49 
155 


reg 

180 

157 

reg 

181 

150 

reg 

182 

156 

reg 

183 

150 

reg 

184 

235 

reg 

185 

154 

reg 

186 

164 

reg 

187 

149 

reg 

188 

87 

reg 

189 

155 

reg 

190 

149 

reg 

191 

164 

reg 

192 

108 

reg 

193 

108 

reg 

194 

1 17 

reg 

195 

108 

reg 

196 

12 

reg 

197 

142 

reg 

198 

253 

reg 

199 

187 

reg 

200 

27 

reg 

201 

69 

reg 

202 

188 

reg 

203 

235 

reg 

204 

224 

reg 

205 

99 

reg 

206 

1 46 

reg 

207 

83 

reg 

208 

182 

reg 

209 

125 

reg 

210 

55 

reg 

21 1 

128 

reg 

212 

142 

reg 

213 

223 

reg 

214 

38 

reg 

215 

217 

reg 

216 

214 

reg 

217 

143 

reg 

218 

244 

reg 

219 

24 

reg 220 

read y. 

1 12 


Pieptyi 


Sommige mensen werpen bij het typen op hun computer om de 
vijftien letters even een blik op hun monitor (of televisie), om er 
maar zeker van te zijn dat ze geen letter vergeten hebben. Nu 
kun je deze ’missers’ ook met je oren constateren, mits je 
natuurlijk bij elke aanslag een piep hoort natuurlijk. Die piep zit 
nadat je dit programma geRUNd hebt in je C-16 en Plus/4. Nog 
wél even zorgvuldig blijven kijken bij het overnemen van deze 
listing natuurlijk. 


1 rem pieptyp / c 16 

2 rem door henk van harmelen 

3 rem uit emmeloord 

4 rem 

10 reada$: i -F a$< > " "thenpokel536 + x , dec 
(a$ >:x=x+l:gotol0;elsesysl577 
20 dataa5,c6,c9,40,d0,0b,ad, 11, -f *f , 29 
,e-F,8d,ll,-F-F,4c,0e,ce,a9,6e,8d,0e 

, -F-F , ad, 1 1 , -F -f , 09 

30 datal-f , 3d, 11,-F-F,ad, 12,*F-F,09,03,8d 
, 12,-f f , 4c, 0e, ce, a9,00,8d, 14,03,a9 
,06,8d,15,03,60, 


*** EINDE LISTING *** 


pieptyp c-16 




regel 1 
regel 2 
regel 3 
regel 4 


147 

regel 

10 

156 

26 

regel 

20 

25 

37 

regel 

30 

164 

143 

r ead y. 





Ondersteboven 


■ . 
F _I 

WIÉS 


Als u een puzzelprogramma heeft gemaakt en u wilt de oplos¬ 
sing verborgen weergeven dan kunt u dit doen door middel van 
dit kleine programma en er zijn nog wel een aantal leuke 
toepassingen voor te bedenken. 

Zoals de naam al zegt zet dit programma alle tekst onderstebo¬ 
ven op het scherm. Voordat u uw familieleden ondersteboven en 
op hun handen staand voor de televisie opstelt nog even dit. Leg 
een spiegel klaar want de tekst staat ook nog in spiegelbeeld. 


til* 

I 

v« v •«?«?>.<' - ■ 






1 rem ondersteboven / cl6 

2 rem door henk van harmelen 

3 rem uit emmeloord 

4 r e m 

10 reada$: i-fa$<>" s '* thenpokel 536 + x , dec 
(a$):x=x+l: gotol0 

20 poke6529B,192:poke65299,58:sysl53 
6 

30 dataa2,08,a0,-f-F,c8,ca,b9,00,d0,9d 

, 00,38, e0,00, d0, -f4, 18, ad,07,06,69 
,08,8d,07 

40 data06,ad,08,06,69,00,8d,08,06,18 
,ad,0a,06,69,08,8d,0a,06,ad,0b,06 
,69,00,8d 

50 d at a0b , 06 , c 9,3-F , d0 , c a , 60 , s 


$ist 


ttSlfcli 


I 




*** EINDE LISTING *** 


ondersteboven 


regel 

regel 

regel 

regel 

regel 


70 

26 

37 

143 

110 


regel 

regel 

regel 

regel 



s wam 




































In dit artikel geeft J.Weber op een eenvoudige wijze uitleg en een programmavoor 
beeld over de mogelijkheden en moeilijkheden bij gebruik van de combinatie high- 
resolution en karakters/lettertekens bij de C-64. / —-wf 


£st in de high 
map mode 


voor Commodore 64 


I n dit artikel zal via vrij eenvoudige 
Basic stappen het gebruik van ka¬ 
rakters in de Hi-res mode van de 
Commodore behandeld worden. Na¬ 
tuurlijk kan dat eventueel in machi¬ 
netaal allemaal sneller en fraaier, maar 
we willen vooreerst de boel zo duidelijk 
houden als maar kan; machinetaal is 
voor gevorderden en is hier niet op zijn 
plaats. Een nadeel is wel, dat u hierdoor 
soms even moet wachten op zichtbare 
acties van de computer omdat de hoge¬ 
re programmeertaal Basic regel voor 
regel vertaald (vertolkt) moet worden 
door de Basic-interpreter en dat kost nu 
eenmaal tijd. 

De beeldfiguren, Sprites ofwel qua om¬ 
vang beperkte en in één keer gedefinieer¬ 
de tekens, zijn erg geschikt voor het ma¬ 
ken van leuke plaatjes. Daarmee is, natuur¬ 
lijk met enige moeite, een mooie tekening 
in high-resolution nog funktioneel te ver¬ 
fraaien. De tekening gecombineerd met 
bewegende en/of veranderende sprites 
kan b.v. een in werking zijnde machine 
uitbeelden. Misschien ligt hier alvast het 
idee, voor een eigen educatief pro¬ 
gramma! 

Veel van de beeldjes in spelprogramma’s 
bestaan (grafisch) op een dergelijke ma¬ 
nier alleen maar uit sprites, als je ze nl. 
tegen elkaar zet (op elkaar, naast elkaar), 
ontstaat een gebied op het scherm, dat 
gemakkelijk veranderd kan worden en dus 
geschikt is voor animatie en tekeningen. 
De veranderingen zijn mogelijk door te 
POKEn in het R.A.M.-gebied van de spri¬ 
tes en/of ze te bewegen en/of het tonen 
van verschillende sprites enz. Het voor¬ 
deel van het werken op deze manier is 
natuurlijk, dat u niet naar ”high-res” hoeft 
over te schakelen en u nu direkt tekst kunt 
schrijven onder het door u gekozen (bewe¬ 
gende en in volle actie zijnde) onderwerp. 
Wanneer u op een bepaald moment toch 
tot high-res. over wil gaan, kunt u in die 
mode niet via PRINT-opdrachten direkt 
tekst neerzetten en daar moeten we dus 
iets op vinden. 


•X, 


Tekst in Hi-res 

Laten we beginnen met het beschikbaar 
maken van de eerste 64 karakters van set 
1, dus beginnend bij het apestaartje en 
eindigend met het vraagteken, (zie blz. 376 
van de REFERENCE GUIDE). Zoals u mis¬ 
schien wel weet, bestaat elk karakter uit 8 
bytes, dus voor deze 64 karakters (=ook 
de graphics!) nemen 8*512=4096=4k ge¬ 
heugenruimte in. (blz. 104 en 105 REF. 
GUIDE). 

Om te kunnen schrijven in high-resolution 
mode moet u toegang kunnen krijgen tot 
het gebied waar de bytes van onze karak¬ 
ters staan. 

Als u de computer aanzet dan werkt u in 
BANK no. 0. De VIC-chip ’kijkt’ naar deze 
BANK (16K) om het video-gebeuren (dus 
wat op het scherm verschijnt!) te regelen. 



Deze chip kan slechts naar 16K tegelijk 
’kijken’ en er wordt een truc uitgehaald om 
de chip ook daar de 4K aan karakter-bytes 
te laten ’zlërf. De 4K karakter-bytes wor¬ 
den als het ware overgebracht van karak- 
ter-ROM (53248-57343) naar BANK 0. 

Nu komen de plaatsen vanaf 53248. Maar 
hoe kijkt de VIC-chip nu tegen BANK 0 
aan? Hij ziet wat er op het scherm moet 
komen door locaties 1024 t/m 2023 af te 
tasten, ook ziet hij wat we b.v. met locatie 
2040 uitspoken .... 

Maar waar is de tekening van sprite no. 0? 
Als we een sprite-pointer invoeren van 
255, dan staat die sprite aan het einde van 
BANK no. 0. Deze sprite kunnen we te¬ 
voorschijn toveren, maar als we een sprite- 
pointer invoeren van 100 (R.A.M.-locatie: 
6400) dan zullen we de ontworpen sprite 


10 


SCREEN CODES 0 T/M G3 DUS © T/M ? (3ECOPIEERD NAAR 


20 

30 

50 

60 


82 

90 

35 

97 


‘SCHRIJVEN 1 


REM*** SET1 
49152- 

REM*** OM HET MOGELIJK TE MAKEN IN HIGH RESOLUTION TE 
REM*** MET BEHULP VAN STRINGS DIE DAN DE TEKST VORMEN 
POKE56334,PEEK <56334>AND254 s REM* ** TURNS INTERRUPTS OFF 
POKE1rPEEK <1>AND251 ï REM*** SWITCH OUT I/O 
7e A=53248:B=49i52ïF0RX=AT0A+64*8ïP0KEB,PEEKCX):B=B+i:NEXTX 
80 P0KE56334 r PEEK C56334 >OR1 
POKE1 r PEEK <1)GR4 
PRINT* J" jf 

P0KE532B5 r PEEK <53265)0R32 ïREM*** TURN ON HIGH-RESOLUTION 
P0KE53272,PEEK <53272 >0R8 sREM*** PUT BIT MAP AT 8192 
100 FORX^B192T08132 +7 s POKEX,0:NEXTX!REM*** MAAK LINKERBOVEKWOEK LEEG 
110 A=8192:B=49152 

115 FORTE=0TOS3ïREM*** LAAT SET1 UPPER CHARACTERS © T/M ? ZIEN 
120 F0RX=AT0A+7:P0KEX,PEEK<B>JB=B+1:NEXTX 
130 FORT =1TO500 ï NEXTT 
NEXTTE 

REM*** VOORBEELD OM EEN TEKST-ZIN ALS 
REM*** DAN IN HIGH-RES. TE LATEN ZIEN 
A$="DIT IS EEN TEST OM TE CHECKEN VIA 
HIGH-RES. H 

PO=1sA=8132:B=431525TE=0 

FORAA=0TO63 : REM*** TAST 70 CHARACTERS VAN DE 
170 L$=MID*<A*,PO,1>ïL*ASC<L30 
172 IFL >63THENL=L-64 

180 F0RX=AT0A+7 : POKEX,PEEK CB+L*S+TE >:TE=TE + 1:NEXTXsA=A+8sPG=PO+1: TE=0 
185 NEXTAA 

190 FORT=1TO5000:NEXTT 
195 REM*** WISSEN TEKST 

137 A=©192 ï FÖRX»ATÖA+69*8+7•POKEX,0 ï NEXTX 
READY. 


140 

150 

152 

160 

165 

169 


STRING OP TE GEVEN EN 
<POKEN> 

STRING TEKST TE POKEN NAAR 


STRING AF 

iiÉiil m 1 m i m • S ■.< 


55 




niet zien. Het R.A.M.-gebied 4096-8191 
kan niet door de VIC-chip bekeken wor¬ 
den! Voor dit RAM.-gebied is als het ware 
een scherm opgetrokken dat bestaat uit 
de bytes van de karakters! We moeten de 
karakter-bytes te pakken zien te krijgen. 
Daarna wordt het simpel kopiëren. Het 
volgende programma zal dit verduide¬ 
lijken. 

In regel 50 zorgen we er voor dat er geen 
interrupts plaats vinden. In regel 60 scha¬ 
kelen we 1/0 uit en bewerkstelligen de voor 
ons belangrijkste actie nl.: de karakter- 
ROM. wordt weer teruggebracht naar 
53248-57343 en nu kunnen we daar de 
karakter-bytes bekijken. Let u nog maar 
niet te veel op deze wellicht onbegrijpelijke 
POKE’s, uw Commodore 64 is voor heel 
wat programmeurs een nachtmerrie! De 
computer is nu in een bijzondere toestand 
en we gaan via regel 70 onze eerste 64 
karakters copieren naar een bepaald ge¬ 
bied dat lekker ver weg ligt en niet door 
Basic bedreigd wordt. Dit gebied 49152- 
53247 (4K) is vrij voor gebruik en zou de 
gehele karakter-set kunnen bevatten. 
(REF. GUIDE blz.320). In onze lus wordt 
een bytje te veel gecopieerd maar dat 
maakt niets uit. Nu hebben we ons verze¬ 
kerd van het beschikken over de karakter- 
bytes en we kunnen weer terugschakelen 
naar de normale omgang met de computer 
wat we via regel 80 en 82 doen. Via regel 


90 wordt het scherm schoon .... 

De locaties 1024 t/m 2023 krijgen daar¬ 
door de waarde 32, wat tot gevolg heeft 
dat de achtergrond van het high-res. beeld 
zwart wordt en de tekst rood (bekijkt u dit 
eens goed; REF. GUIDE blz 123). Via regel 
95 springen we naar high-res. en via reg. 
97 vindt de plaatsbepaling ervan plaats. 
Een rommelig scherm, omdat het high-res. 
gebied niet is schoongemaakt! 

**Via regel 100 maken we de eerste 8 bytes 
gelijk aan 0, dat wordt dus een zwart linker 
boven-hoekje. In deze hoek zullen we nu 
onze 64 karakters de revue laten passeren, 
regels 110-140 zorgen hiervoor. De karak¬ 
ters worden dus gelezen (8 bytes elk) en 
gepoked naar de linker boven hoek, na elk 
karakter even een pauze door middel van 
regel 130 en dan weer een volgend karak¬ 
ter. We weten nu zeker dat het kopieer 
proces gelukt is. 

Schrijven 

Maar nu het schrijven van tekst in de high- 
res. mode. Een zin die we b.v. willen schrij¬ 
ven staat in regel 160, we maken er maar 
meteen een string van door hem A$ te 
noemen. Deze string bestaat uit 70 karak¬ 
ters die we aftasten door de lus die begint 
in regel 169. Door het trucje in regel 170 
(de MID$- funktie) kunnen we elk karakter 
benaderen. Het karakter wordt bekeken 
en krijgt de ASC-waarde. De ASC-waar- 


den van de karakters in SET 1 vanaf 32 t/m 
63 zijn gelijk aan de screen-codes en be¬ 
hoeven niet gecorrigeerd te worden. In¬ 
dien er echter een ASC- waarde groter dan 
53 uit de bus komt, moet er 64 van worden 
afgetrokken om de screen-code te krijgen, 
deze correctie vindt plaats in regel 172. 
Bekijk nu regel 180. 

L geeft aan waar het bewuste karakter 
staat (vanaf 49152). Waarom er vermenig¬ 
vuldigd wordt met 8 begrijpt u intussen. 
A wordt steeds met 8 verhoogd omdat 8 
schermposities verder steeds het volgen¬ 
de karakter op het scherm moet komen te 
staan. 

PO wordt verhoogd omdat het volgende 
karakter in de string bekeken moet 
worden. 

TE zorgt voor het bekijken van de volgen¬ 
de byte van het te copieren karakter. Door 
regel 190 laten we de tekst nog even op 
het scherm staan, waarna de tekst gewist 
wordt door regel 197. 

Zorg er voor dat het juiste aantal karakters 
afgetast wordt in de string, bij teveel aftas¬ 
ten krijgt u moeilijkheden met ASC(L$), wat 
dan foutmeldingen oplevert die u niet kunt 
lezen omdat u in high-res. werkt! Probeer 
in de komende tijd elk onderdeel eens 
goed uit en maak dan door de opgedane 
kennis uw eigen subroutine, die erg kort 
kan zijn. 
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Mac 64 

De computer als meetinstrument, zonder aparte oscilloscoop toch 
kunnen meteen en regelen, dat is een wens voor veel elektronica-hobbyisten. 
Met MAC kan men de 64 gebruiken als meetapparaat voor 
andere computerapparatuur. 



Een paar maanden geleden zagen de eer¬ 
ste exemplaren van MAC 64 in Apeldoorn 
het daglicht. MAC staat voor Measure- 
ment Applied Computer. De naam is ech¬ 
ter het enige uitlandige wat er aan deze 
nieuwe ontwikkeling op het gebied van de 
toegepaste informatica te vinden is. MAC 
64 is bedoeld om als precisie-meetinstru- 
ment te gebruiken in samenwerking met 
de C-64 of de C-12S in 64 stand. Het 
geheel is ontwikkeld door de heren Maris 
en Miedema, waarbij de eerste het leeu¬ 
wendeel heeft geleverd. 

Het is een goed ogend stuk instrumenta¬ 
rium, dat kan worden gebruikt als com¬ 
pleet gereedschap voor een groot toe¬ 
passingsgebied in de electronica. Al met 
al een verzameling digitale en analoge 
instrumenten, verpakt in een ROM-module 
en één of meerdere goed ontworpen kast¬ 
jes die de aan de Commodore toegevoeg¬ 
de functies verwerken, en waarop de sen¬ 
soren en meetsnoeren kunnen worden 
aangesloten. 

Het is de bedoeling dat MAC 64 voorna¬ 
melijk gebruikt gaat worden door electro- 
nica-hobbyisten die over een Commodore 
beschikken. Deze worden daarmee in 
staat gesteld alle metingen te kunnen ver¬ 
richten, waarvoor anders -voor hobby- 
doeleinden- niet te betalen apparaten 
moeten worden aangeschaft. Daarnaast is 
deze revolutionaire ontwikkeling ook nog 
voorzien van een 8-bits logic analyzer, 
waardoor het apparaat aan potentie der¬ 


mate toeneemt dat er ook gebruiksmoge¬ 
lijkheden kunnen worden gezocht in de 
sector van het technisch onderwijs, de 
-produktontwikkeling en serviceverlening 
van de kleinere bedrijven. 

Wij hebben een exemplaar van de MAC 64 
een paar weken lang laten gebruiken in de 
laatstgenoemde toepassing. Er zijn erva¬ 
ren electro-monteurs mee aan de slag 
geweest, die over het apparaat bijzonder 
enthousiast waren. Dat zegt in feite ge¬ 
noeg, zeker als je bedenkt, dat deze heren 
gewend zijn te werken met meetappara¬ 
tuur die in prijs het tienvoudige kost van de 
door Maris geleverde MAC. Uiteraard is 
het zo, dat je niet de meest geavanceerde 
metingen kunt verrichten met een appa¬ 
raat als dit, maar voor de ’simpele’ micro¬ 
processor metingen heeft het meer dan 
voldoende mogelijkheden in huis. 
Funkties 

In dit bestek gaat het te ver om alle opties 
van de MAC in extenso te beschrijven, 
maar een paar hoofdzaken willen we u niet 
onthouden. . 

Het ontwerp bestaat uit een digitaal en 
een analoog moduul. Beide werken in 
relatie met een ROM-pack, waarin de ma- 
chinetaal-software is gebrand. Als moge¬ 
lijkheden zitten daar voor het digitale deel 
de instrumenten logic time analizer, pa¬ 
troon generator en frequentiemeter in. 
Het analoge gedeelte omvat o.a. een volt- 
meter, oscilloscoop, functie-generator en 
een frequentiemeter met analoge ingang. 
In het kort geven we hierbij een overzicht 


van de belangrijkste technische specifica¬ 
ties voor de afzonderlijke instrumenten, 
omdat met name deze de waarde en effec¬ 
tiviteit van een goed meetinstrument be¬ 
palen. 

De logic time analyzer heeft een interne 
bemonstering van 100 Hz tot 500 kHz. 
Extern is dit 5MHz. De sampling kan ge¬ 
schieden met 2 clock qualifiers. De breed¬ 
te is (jammergenoeg) slechts 8 kanalen. De 
display gebeurt, net als bij de andere in¬ 
strumenten, op het scherm van de C-64/ 
128. De layout van de diverse schermen is 
in de meeste gevallen overzichtelijk, al is er 
hier en daar wat teveel informatie op een 
rommelige manier op het scherm te zien. 
Maar goed, als het apparaat al die gege¬ 
vens meet, waarom zet je ze dan ook niet 
allemaal op het scherm, nietwaar. 

Het is jammer, dat er niet wat meer geheu¬ 
gen is gereserveerd voor de ’flow’ van het 
te analiseren programma, max. 512 Bytes. 
Je moet nu tijdens het meten standby 
staan bij het apparaat, om niets te missen 
van alle gegevens die je op het scherm 
krijgt. 

In de toekomst zal er hiervoor een uitbrei¬ 
ding tot 16 kanalen beschikbaar komen, 
samen met een vergroting van het meetbe- 
reik tot maar liefst 10 MHz! 

Signaal generator 

De patroon generator levert 1 -6 Bytes TTI- 
output met een max. Baudrate van 250 
kHz. Defreqentie loopt tot 500 kHz waar¬ 
bij er in de software een 1Ü~voudige pre- 
scaler zit. De displaytijd is tot 10 seconden 
instelbaar, zowel bij de continue- als de 
single-stand. 

Als laatste de analoge oscilloscoop. Deze 
heeft 2 kanalen, een triggerpunt in het 
midden van het scherm en een tijdbasis 
met een aantal vaste ’times per division’ 
punten. De max. frequentie is 100 kHz. 
Het complete apparaat zoals hier beschre¬ 
ven kost op dit moment 889 gulden. Voor 
zo’n 250 gulden minder zijn zowel het 
analoge als het digitale deel van MAC 64 
apart te leveren. Uitbreidingen zijn ook 
mogelijk. Hoewel nog altijd forse bedra¬ 
gen, staat het in geen verhouding tot de 
prestaties die MAC 64 bij een professio¬ 
neel gebruik kan leveren. Voor een scoop 
ben je al gauw een veelvoud hiervan kwijt. 
Het pakket gaat vergezeld van een (soms 
wat te) duidelijke handleiding, waardoor 
het óók voor de minder handige electroni- 
cus mogelijk wordt allerlei metingen te 
gaan doen met hulp van de MAC 64. 

Al met al weer eens één van de nieuwighe¬ 
den die werkelijk het vermelden waard zijn. 
Te meer , daar dit het resultaat is van een 
lange periode van research en tryouts. 
Inlichtingen over MAC 64 zijn te krijgen bij 
Maris Electronics, Apeldoorn, tel (055) 
424485. 
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Diverse pas beginnende micro gebruikers hebben problemen met het begrip ”bank- 
switching”. Het gebruik van meer geheugen dan voorhanden is komt vaak wat vreemd 
over en is een vaag begrip. Men ziet het vaak in de literatuur, maar men durft of wil niet 
vragen wat het is, omdat men kennelijk denkt dat dit dom is. Maar juist van veel vragen 
leert men veel en de wat meer ingewijden praten daar soms heel gemakkelijk over, 
zonder het idee te hebben, dat het voor de leek moeilijk te verteren kost is. Een heel 
simpel gehouden uitleg over wat bankswitching inhoudt. 



In de computer bevinden zich geheugen 
eenheden met een totale grootte van, stel 
64K ofwel 65536 bytes, leder byte of loca¬ 
tie heeft een nummer of zoals dat heet een 
adres; bij 64K genummerd van 0 t/m 
65535 (totaal 65536). Bij de meeste pro¬ 
fessionele computers wordt bij het aanzet¬ 
ten vanaf de system-diskette of hard-disk 
het operating systeem (kortweg OS) in het 
geheugen geladen. Van het oorspronkelij¬ 
ke geheugen, ook wel RAM (Random Ac¬ 
cess Memory) genoemd, wordt dus een 
deel door de OS gebruikt, zodat voor de 
gebruiker het resterende deel overblijft. 
Het OS wordt in bepaalde delen van het 
RAM geladen en zou men op die locaties 
data wegschrijven, dan verwoest men de 
codering van het OS. Als men gaat pro¬ 
grammeren zorgt een bijbehorend vertaal¬ 
programma (compiler of interpreter) er¬ 
voor, dat relevante delen van het RAM niet 
beschreven kunnen worden. Bij de kleine¬ 
re homecomputer heeft men het laden van 
het OS anders opgelost. 

Zodra de computer wordt aangezet, is het 
OS beschikbaar. Dit is mogelijk gemaakt, 
door naast het bestaande RAM, andere 
componenten in de machine toe te voe¬ 
gen, extra dus, die alle codering (leesin¬ 
structies) voor ‘het OS bevatten en welke 
niet te beschrijven zijn, dez.g. ROM’s(read 
only memory). Ook deze componenten 
hebben een adres en wel adressen welke 
overeenkomen met bepaalde RAM delen. 
Men zou ongeveer de volgende vergelij¬ 
king kunnen maken. Er is een spoorbaan 
waaraan verschillende perrons liggen. Dit 
zijn de RAM- chips. Deze bestaan uit reek¬ 
sen aaneengesloten adressen. Het ‘totaal 
aantal perrons vertegenwoordigt de totale 
geheugen capaciteit. De perrons worden 
aangeduid met perron la,2a,3a,enz. 


Naast een aantal perrons is een tweede 
perron gebouwd; deze vertegenwoordi¬ 
gen de ROM-chips. Zij worden aangeduid 
met b.v. perron 3b,6b,11b enz. 

Door middel van wissels wordt de trein bij 
de ”dubbele” perrons ofwel langs het a- 
perron, ofwel langs het b-perron geleid. 
Standaard langs het b-perron, omdat de b- 
perrons de ROM’s vertegenwoordigen en 
daarin bevinden zich de instrukties voor 
het OS. De architectuur van de machine is 
zo uitgevoerd, dat uit het ROM alleen 
gelezen kan worden en uit en in het RAM 
zowel gelezen als geschreven kan worden. 
U kunt zich voorstellen, dat standaard 
delen van het RAM niet worden gebruikt 
vanwege het lezen van de ROM-compo- 
nenten. Dit is eigenlijk zonde van de ruim¬ 
te. Deze zou beter kunnen dienen. 

Het is echter mogelijk om door middel van 
registers, welke door de processor worden 
gebruikt voor het correct uitvoeren van de 
taak, door te geven, dat niet "access" 
gepleegd moet worden op b.v. ROM-xb, 
maar op het overeenkomstige RAM-xa, 
opgegeven door middel van het juiste 
adres. Een bepaald register dient als wis¬ 
sel. Deze truc wordt gebruikt bij "bank 
switching”, hetgeen aanduidt dat het een 
groep bij elkaar behorende eenheden of 
adressen betreft. We kunnen in een pro¬ 
gramma, of direkt via de monitor aan het 
OS doorgeven, dat een bepaalde hoeveel¬ 
heid data tijdelijk moet worden weggezet 
op b.v. (het braak liggend) "perron 11a" 
(RAM dus). 

Het OS zet dan de wissel om en zet data 
vanuit een opgegeven locatie af op "per¬ 
ron 11a”, waarna de wissel wordt terugge¬ 
zet in de oude stand; het omzetten van de 
wissel wordt dus voor u gedaan. 


Op dezelfde wijze kan de data op een later 
tijdstip worden opgehaald voor verdere 
verwerking. 

Let wel: het is een tijdelijke opslagmethode 
in onder BASIC niet gebruikt RAM; zodra u 
de computer uitschakelt gaan de data 
verloren. # 


INZENDVOORWAARDEN 


Programma’s en artikelen kunnen aan de 
redactie van Commodore-lnfo, PB 112, 
1260 AC te Blaricum met vermelding RE¬ 
DACTIE Cl, worden ingezonden en worden 
eventueel geplaatst, waarbij de inzender 
een door de redactie te bepalen vergoe¬ 
ding ontvangt. Vermeld altijd naam, adres 
en vooral telefoonnummer. Alleen Listings, 
waarvan een cassette of diskette beschik¬ 
baar is, komen in aanmerking. 

Gezien het relatief grote aantal inzendin¬ 
gen kan verwerking enige tijd op zich laten 
wachten. Indien we zeker niet tot plaatsing 
overgaan, ontvangt men de inzending re¬ 
tour, eventueel houden we het nog enige 
tijd als reserve. 

SAC behoudt zich het recht voor, er redac¬ 
tionele wijzigingen in aan te brengen. Door 
inzending accepteert men, dat bij plaat¬ 
sing alle publikatierechten, ook in electro- 
nische vorm, op de uitgever van het blad 
overgaan en dat men het blad vrijwaart van 
aanspraken van derden, bijvoorbeeld om¬ 
dat het programma eigenlijk van een ander 
is of bv. deels of geheel uit een ander blad 
is overgenomen. Het overnemen van lis¬ 
tings door lezers is toegestaan, maar ver¬ 
koop van die listings, in welke vorm ook, 
aan derden is voorbehouden. m 
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Basic Miniatuu 


Een rubriek van Nico Baaijens met korte tot zeer korte programma’s. 


Deze keer houden we grote voorjaarsschoonmaak, d.w.z. dat we in dit nummer een 
aantal miniatuurtjes plaatsen die vorige keren door ruimtegebrek afvielen. Dit soort 
„restjes” blijft vaak steeds liggen, zodat er inmiddels een hele verzameling ontstaan is. 
Die vind je nu dus hieronder. Veel plezier. 


Andere wortel-schrijfwijze 

Wortelgetallen kunnen door de C64 ook anders en begrij¬ 
pelijker worden weergegeven. Onderstaand miniatuurtje 
van Frank van Dalen uit Schaijk vraagt bijvoorbeeld om een 
wortelgetal. Als 32 wordt ingegeven, reageert het pro¬ 
gramma met: 4 wortel 2. 

1 INPUT’WORTEL: ”;A: FORQ=1TOINT(SQR(A)): 

K=Q*Q: D=A/K: IFD=INT(A/K) THENG=Q: W=D 

2 NEXT: PRINT G” WORTEL ”W 


Vallend voorwerp 

Een natuurkundig miniatuurtje van Marco Miltenburg uit 
Driebergen. Tik in en experimenteer. 

1 PRINTCHR$(147): INPUT”VLIEGHOOGTE”;H: INPUT- 
”VLIEGSNELHEID”;V 

2 S=V*SQR(H/V): PRINT’DE AFSTAND IS ”;S 

Eindelijk een miniatuur voor de C-16. Ik heb hem bij gebrek 
aan C-16 niet kunnen testen, maar de bron is onverdacht: 
Jetri Productions, Rietdekkersdreef 415, 7328 AE Apel¬ 
doorn. 

10 SCNCLR 
20 INPUT’DE TIJD ”;TI$ 

30 INPUT”ALARMTIJD”;S$ 

40 SCNCLR 

50 PRINT”<CLEAR HOME><2 X NEER><2 X REC 
HTS>”;TI$ 

60 GOTO80 

80 IFTI$=S$ THENVOL5: SOUND1,900,100 
90 GOTO50 

Hieronder een miniatuurtje dat een meerkleurige border 
geeft met interrupt. De inzender is Benno van Ham uit 
Breda. Het programmaatje is gemaakt op de VIC-20 en 
moet worden opgestart met RUN, gevolgd door SYS673. 

10 FORT=673T0673+34: READA: POKE T,A: NEXT 
20 DATA 88,120,169,174,141,20,3,169,2,141 
30 DATA 21,3,96,160,24,162,0,140,15,144,232 
40 DATA 224,255,208,248,200,192,31,208,2 
41,76,191,234,0,0 


Geluid 

We sluiten de rij met twee miniatuurtjes met geluidseffecten. 
Inzender Guy Gijs uit Arendonk in België stuurt een listing, 
waarin de STER-pingel wordt nagebootst, maar zijn pro¬ 
gramma loopt niet. Waarschijnlijk zitten er fouten in zijn, met 
de hand geschreven listing. 

Erg aardig is het geluidsminiatuurtje van Edgar van Oostrum 
uit Druten. Als de regels 20 en 40 worden weggelaten wordt 
het effect heel anders. 

10 POKE 54296,15 
20 FOR l = 1TO50:NEXT I 
30 POKE 54296,0 
40 FOR l = 1TO50:NEXT I 
50 GOTO 10 

Hekkesluiter wordt Fred van den Bergh uit Dordrecht met zijn 
interactieve geluids-miniatuurtje. Geef na run om te beginnen 
de volgende input-waarden op: 1, 10, 1 en 17 en ga vervol¬ 
gens zelf experimenteren. 

10 POKE 54273,0:PRINT ”<SHIFT CLR/HOME>” 

20 INPUT’BEGINWAARDE 0/255”;A:PRINT 

30 INPUT’EINDWAARDE 0/255”;B:PRINT 

40 INPUT”STEP”;C:PRINT 

50 INPUT’TOON 17, 33, 129 ”;D 

60 IFD<17THEND=17:IFD>129THEND=129 

90 FOR F=54276T054296:POKE F,0:NEXT F:PRINT ”<SHIFT 

CLR/HOME>” 

100 POKE 54296,140:POKE 54278,240:POKE 54276,D 
110 FOR T=ATOBSTEPC:POKE 54273,T:NEXT T:PRINT 
”<SHIFT CLR/HOME>” 

120 S=S+2:POKE 1024+S,81:IFS>100THENS=0 
130 GETA$:IFA$=” ’THENIO 
140 GOTO110 

Ontbinden in priemgetallen 

Het best is de C64 in zijn element als hij kan rekenen. De 6502 
microprocessor wordt door computerkenners van het ’Quick and 
Dirty’-type genoemd, in vergelijking bijvoorbeeld met de Z80 en 
de 8088. Hoe dan ook, als het op rekenen aankomt, verslaat de 
6502 menige 16 bitter met glans. Een echt rekenprogramma 
kwam van Mark D’Hondt uit Eeklo in België. Het ontbindt getallen 
in priemfactoren. 

5 PRINT CHR$ (147): INPUTA 
7 IF A<>INT(A)ORA<1 OR A>999999999THEN 5 

10 PRINT "NAAR PRINTER J/N” 

11 GETAS.IF A$o”J”ANDA$o”N”THEN 11 

12 IF A$=”J”THEN OPEN4,4:CMD4 

19 IF A/2=INT(A/2)THEN X=2:GOTO40 
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20 F0RX=3T03QR(A)STEP2;IF A/X-INT(A/X)THEN 40 
30 NEXTX:PRINT TAB(20-LEN(STR$(A)))AT’;:IF AOlTHEN 
PRINT A:PRINT TAB(18)1”I” 

35 GOSUB50:RUN 

40 PRINT TAB(20-LEN(STR$(A)))A’T 7 X:A=A/X:GOTO19 

50 P0KE198,0 

55 GETB$:IF B$=””THEN 55 

60 IF A$=”J”THEN PRINT #4:CLOSE4 

70 RETURN 

Nuttig 

Bijzonder nuttig is de inzending van Ch. de Vos uit Lokeren, ja 
alweer uit België. Daar zitten toch maar de echte Gommodore- 
fanaten, die ook weten hoe ze hun miniatuurtjes op de redaktie 
van Commodore Info en in handen van ondergetekende moeten 
krijgen. 

Dit miniatuurtje is eigenlijk onmisbaar voor iedereen, die program¬ 
meert in Basic. De C64 kent geen commando om een per ongeluk 
geNEWd programma terug te krijgen, zoals bij de BBC’s, die OLD 
kennen als tegenhanger van NEW om het programma terug te 
krijgen. Op de TRS-80 onder NEWDOS/80 kan een 'gewist’ Basic- 
programma met RENEW worden terug gehaald. De routine van 
De Vos geeft, na het invoeren en runnen van het miniatuurtje, elk 
Basic-programma terug, dat verloren is gegaan door NEW of een 
RESET met SYS 20000. 

50 FORI-0TO44 
60 READA 
70 POKE20000HA 
80 NEXTI 
90 END 

100DATA169,8,141,2,8,76,51,165,172,174,0,140,45,0,172,175 
110 DATA 0,140,46,0,172,174,0,140,47,0,172, 175,0,140,48,0 
120 DATA 172,174,0,140,49,0,172,175,0, 140, 50, 0, 96 

Teksteffect 

Een beter teksteffect dan gegeven in de Miniatuurtjesrubriek van 
Jaargang 2, nr. 7 geeft Leo J. de Rijk uit Amsterdam. Als dit effect 
niet de aandacht trekt van de speler van een game of de gebruiker 
van een nuttig programma, mankeert er iets aan het waarne¬ 
mingsvermogen van de man achter beeldscherm en toetsenbord. 

100 PRINT ”(SHIF T/CLR/HOME)”:A$=”(37 SPATIES) IK BEN 
EEN TROUWE ” 

110 B$=”LEZER VAN COMMODORE INFO ”:C$=A$+B$ 

130 FORI = 1TOLEN(C$): PRINT MID$(C$,I,40):FORJ = 1TO- 

100:NEXT:NEXT:RUN 

Meer Cl6-geheugen 

Simpel maar handig en voordelig is het kleintje voor de Cl 6 van 
A.H. Middel uit Veendam, dat moet resulteren in meer geheugen, 
dat ook tijdens de programma-afwerking steeds wordt weergege¬ 
ven. 

5 POKE56,123:POKE52,123 

10 A=FRE(X) 

20 IF A>0THEN 40 
30 A=A+256*256 

40 PRINT "VRIJ GEHEUGEN: ”;A;” BYTES” 

50 GETKEYAS • 


THE AMAZING 
AMIGAÜ 

DE AMIGA NU LEVERBAAR 

ƒ 4.950- 

excl. BTW 


Verder leveren wij ook: 

Amiga Monitor 
256K Ram uitbreiding 
Drive 3,5 inch. 

Drive 5,25 inch schakelbaar 40-80 tracks. 

Verder verkrijgbaar: 

Uniek! Processor gestuurde interface 
voor Star printers naar cbm print met alle 
programma’s en alle karakters 
Star printer ook leverbaar met 
ingebouwde interface 

Monitoren: 

Philips Kleur. 

Philips type 80. 

Fidelity CM 14. 

Uit eigen productie: 

Beschermkap voor cbm-128 
Beschermkap voor cbm-64 
Cartridge behuizingen voor cbm 64-128 

OOK LEVERBAAR COMMODORE 
ONDERDELEN! 


BEL VOOR PRIJZEN: 

085-435119 

DEALER AANVRAGEN WELKOM 


RBBBIT 5B5TETTI5 


COMPUTERS en SUPPLIES 



m.i.v. 1 mei 1986 

Overmaat 34 
6831 AH Arnhem 

maar nu al bereikbaar 

Postbus 5156 
6802 ED ARNHEM 
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Kort geleden werd in Bellevue door Microsoft de eerste grote CD-ROM conferentie 
georganiseerd. Een belangrijke gebeurtenis, omdat daar niet alleen een aantal CD- 
ROM standaards werden aangekondigd, maar ook omdat de mogelijkheden en 
toepassingen van deze techniek hierdoor duidelijker worden. Op een CD-ROM past 
een komplete softwarebibliotheek. Een half miljard tekens ofwel 500 MB op een klein 
aluminium schijfje is slechts het begin van deze snel in opkomst zijnde geheugentech- 
nologie. 
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D e uitvinding van de door een 
lasertastkop uitgelezen com¬ 
pact disk door Philips en de ver¬ 
dere ontwikkeling ervan door 
Sony en Philips samen, bracht 
een geheel nieuwe geheugentechnolo- 
gie op gang. Ging het daarbij eerst voor¬ 
namelijk om optische audiogeheugens, 
spoedig kwamen daar de videogeheu- 
gens en eerste computertoepassingen 
bij. 

Men spreekt van een compact disk 
ROM of read-only memory, omdat de 
opgeslagen informatie uitsluitend uit¬ 
gelezen kan worden. Bij de huidige CD- 
ROM’s worden de bits al tijdens de 
fabrikage ingebrand/gecodeerd en zijn 
zij later niet meer te wijzigen of te 
wissen. 

Al in het begin van de zestiger jaren experi¬ 
menteerde 3M met laserdisk technolo- 
giën. Pas in de jaren 70 waren de eerste 
commerciële laserdiskafspelers verkrijg¬ 
baar. Overigens geen groot succes door 
de snel stijgende populariteit van de huis- 
videorecorder en de prijsstelling. Alleen 
voor demonstratie-en trainingsdoeleinden 
vonden de videodisks en -players wel re¬ 
delijke aftrek. 

De grote doorbraak kwam uit de onver¬ 
wachte audiohoek. De compact disc 
sloeg, na enige aarzeling, goed in bij het 


grote publiek en de prijzen van de CD- 
afspelers dalen nog vrijwel elke maand. 
Door de groeiende populariteit van de 
compact disk kreeg ook de videodisk 
nieuwe impulsen. Eerst richtte de belang¬ 
stelling zich vooral op het wetenschappe¬ 
lijke aspect van de gegevensopslag en de 
Interactieve Video Technologie (IVT). Later 
kwamen daar de meer commerciële toe¬ 
passingen zoals reklame-, speelfilms, toe¬ 
ristische- & klanteninformatie, interactieve 
adventures en komplete naslagwerken op 
beeldplaat bij. 

Een audio compact disk of videoplaat is 
eigenlijk geen CD-ROM. De aard van de 
audio- en videosignalen verschilt sterk van 
de digitale computerdata. Zij gebruiken 
echter wel alle drie een reflecterende alu¬ 
minium disk en een laserafspeler en zijn 
mechanisch dan ook gelijksoortig. Zo zijn 
er wel combinaties van de laserdisk en CD 
afspelers. 

Een heel nieuwe richting vormet Interac¬ 
tieve CD, dat zijn de toepassingen zoals 
encyclopediëen, maar vooral ook educa¬ 
tieve "software”, waarin de gebruiker in 
samenspel met computer en/of speler zijn 
weg zoekt door de informatie. Daarvoor 
wordt nu hardware ontwikkeld, die zich 
houdt aan de "Green book” standaard, 
zoals die door Sony, Philips en Matsushita 
is vastgelegd. Men gaat daarbij uit van de 


68070 CPU als processor voor dit soort 
apparatuur. 

Compact Disc ROM 

Het CD-ROM lijkt veel op een normale 
compact disk. Het als een spiegel glim¬ 
mende, aluminium met plastic bescherm¬ 
laag, plaatje heeft een doorsnee van onge¬ 
veer 12 cm. Helaas zijn er inmiddels al 
enige afwijkende maten en vooral verpak¬ 
kingen/huisjes gesignaleerd zodat de 
vrees is, dat de standarisatie de komende 
jaren wel weer op een systeemstrijd zal 
uitdraaien. 

Het aluminium plaatje is bedekt door een 
plastic laagje of coating. Deze coating of 
optical recording layer vormt de feitelijke 
informatiedrager. De informatie wordt als 
een serie putjes (de enen) gecodeerd. Een 
putje heeft een andere reflectie dan het 
gladde diskoppervlak. De coderingstech¬ 
niek gaat echter nog veel verder want ook 
de grootte van de putjes en hun onderlinge 
afstand is bepalend voor de informatieo¬ 
verdracht. 

Het fabriceren van de disks gaat eigenlijk 
net zo als bij een conventionele grammo¬ 
foonplaat. Een matrijs of moederplaat (bij 
de disks de master platter) ponst de putjes 
in haar dochters. Tot slot gaat er ter be¬ 
scherming nog een transparante laag, de 
scuff coat, over de disk. 
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Op een CD-ROM-schijfje gaan in theorie 
met gemak meerdere Gigabytes aan data. 
Een Gigabyte is 1000 Megabytes. Maar we 
zijn nog niet zover, de gewenste zekerheid 
beperkt de opslag nog wat. Een eenvoudig 
klein CD-ROM diskje bevat al gauw zo’n 
0,5 Gbyte. Grotere CD-ROMs gaan in de 
toekomst zeker een veelvoud aan op¬ 
slagcapaciteit bieden. 

Deze enorme datacapaciteit berust op 
het feit dat het laserafleespunt zo veel 
kleiner is als die van de diskdrivekoppen. 
De grote van de leeskoppen uit de disk¬ 
drive bepaalt de onderlinge afstand (de 
dichtheid of density) van de magneet- 
tracks. Bij gebruik van de zeer scherp 
focuseerbare laserbundel is de mogelijke 
density vele malen groter als bij de con¬ 
ventionele floppy- en hard disks. 

De afspeler 

De als putjes gecodeerde informatie wordt 
door een zwakke laserstraal uitgelezen. De 
moderne 60 dB (signaal/ruisverhouding) 
diodelaser wordt door een optischstelse! 
van spiegels, prisma’s en lenzen naar de 
disk gestuurd. Daar passeert zij de scuff 
coat en treft de informatielaag. Zodra de 
laserstraal een putje raakt verandert de 
polariteit. De weerkaatste lichtbundel 
wordt tezamen met een deel van de origi¬ 
nele straal naar het zogenaamde Wollas- 
ton prisma gezonden en van daar naar de 
opvangende fotosensor. Deze fotosensor 
zet het laserlicht in een electrisch signaal 
om. 

Op zich ziet het bovenstaande er tech¬ 
nisch gezien vrij eenvoudig uit. In de prak¬ 
tijk doen zich echter enkele lastige proble¬ 
men voor; 

O De centrering van de schijf; Bij een 
minieme afwijking gaat de laserbundel al 
over het diskoppervlak zwerven en loopt 
de informatieoverdracht in het honderd. 
©Eigenlijk zou de disk ook perfect vlak 
moeten liggen. Daar dit technisch slechts 
tegen astronomische bedragen uitvoer¬ 
baar is heeft men als goedkoper compro¬ 
mis de laserstraal van een autofocus ser- 
vomechanisme voorzien. Zo kan de laser 
de op- en neergaande bewegingen van de 
disk compenseren. 

©De aandrijfsnelheid dient nauwkeurig 
konstant te blijven. Daarvoor is een apart 
controlecircuit vereist. 

©Een klein stofdeeltje op de bescherm¬ 
laag kan al een hoop uitleesnarigheid ople¬ 
veren. Stofkappen en antistatische maat¬ 
regelen dienen dergelijke drop outs te 
voorkomen. 

Een nieuwe techniek is de scuff coat zo te 
construeren dat de stofjes door onscherp¬ 
te buiten het registrerende gezichtsveld 
van de laserbundel blijven. 

0 Van Bit Read Errors heeft men door het 


gebruik van de 60dB diodelasers en 
meegecodeerde Error Checking 
procedures nog maar weinig last. 

Een CD-ROM drive heeft, in tegenstelling 
tot een compact disk-afspeler geen digi- 
taal-analoogconvertor of stereocircuit no¬ 
dig. Wel is net als bij een gewone floppy 
drive een besturingskaart noodzakelijk. 
Verder is een bijpassend interface onmis¬ 
baar. Niettemin ligt het voor de hand om 
conventionele compact disk players zo te 
construeren dat zij naast audio- ook data- 
disks kunnen afspelen. Opnieuw het wiel 
uitvinden is een kostbare en onnodige 
aangelegenheid en voortborduren op de 
compact disktechnologie zou de de intro¬ 
ductie van dit nieuwe geheugen medium 
flink kunnen versnellen. 

De grote betrouwbaarheid en duurzaam¬ 
heid maken de ROM-disk zeer geschikt ais 
datadrager voor huis- en personal compu¬ 
ters. Het enige beletsel vormt nog steeds 
de prijs. Een goede diskdrive kost rond de 
800 gulden. Voor een kwaliteits CD-ROM 
die slechts data kan uitlezen, betaald men 
bijvoorbeeld bij Philips nog het driedub¬ 
bele. 



Bil Gates ontvangt de CD-versie van het boek, 
CD-ROM: The New Papyrus 


Lezen en schrijven 

In tegen stelling tot de magnetische disk¬ 
drives kunnen de CD-ROM-drives de disks 
niet wissen en schrijven. 

De lees/schrijftechnologie legt zich mo¬ 
menteel toe op het ontwerpen van een 
speciale optical recording laag die de data 
archiefkwaliteit bij wis- en schrijfopties 
moet bieden. Wat de schrijf- en wisopties 
betreft werkt men aan verdampings-, che¬ 
mische-, en vervormende veranderingen 
van het diskoppervlak door een aangepas¬ 
te laserstraalbundel. Er zijn inmiddels twee 
systemen; 

m- Bij het DRAW, Direct Read After Write, 
-systeem worden de te saven data in een 
buffergeheugen bewaard. Een eerste laser 
schrijft de informatie op de schijf terwijl 
een tweede deze direkt na het optekenen 
met de bufferinhoud vergelijkt. Zijn de 
geschreven data identiek aan de geheu- 
genbuffer dan wordt het desbetreffende 
blok valid verklaard. 


Ook het WORM, Write Once Read Many 
times, -systeem werkt met een dergelijk 
buffergeheugen. In plaats van een tweede 
laser gebruikt men de schrijvende straal 
ook als kontrolerende reflectiebundel. Dit 
systeem wordt ook wel DRDW, Direct Re¬ 
ad During Write, genoemd. 


De mogelijkheden 

Tot op heden zijn laserdisk-afspelers be¬ 
halve voor de compact disk voornamelijk 
voor beeldplaattoepassingen als video¬ 
film, geïllustreerde encyclopediën, recla¬ 
me en onderwijs ingezet. De videobeeld- 
plaat heeft, zoals hier boven al uit een 
gezet, weinig gemeen met het CD-ROM. 
De opgeslagen informatie is immers van 
een geheel andere aard, het gaat om zeer 
breedbandige signalen. 

Echte CD-ROMS zijn sedert korte tijd in 
gebruik als database voor grote bedrijven 
en bibliotheken. Ook is het al gelukt om 
komplete naslagwerken op CD-ROM over 
te nemen. Bijvoorbeeld de gehele Acade¬ 
mie American Encyclopedie van Grolier 
Electronic Publishing omvat 21 delen met 
meer dan negen miljoen woorden. De prijs 
bedraagt slechts ƒ500,-, die van de con¬ 
ventioneel gedrukte versie ƒ1500! Wel 
missen we de plaatjes bij de eerste versies 
nog, maar die komen er vast wel bij in de 
nabije toekomst. 

Ook uit de medische hoek is veel belang¬ 
stelling voor deze krachtige ROMs. Een 
Amerikaans medisch genootschap denkt 
er zelfs serieus over om alle de laatste 
1000 jaar verworven geneeskundige ken¬ 
nis volledig geïllustreerd op CD-ROM vast 
te leggen. 

Ook komen vele specialistische applica¬ 
ties met veel achtergrond-data zoals juridi¬ 
sche, medische en technische databan¬ 
ken nu op eenvoudige wijze binnen het 
bereik van de kleine computergebruiker. 


. 
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De CD-ROM zal op korte termijn een 
deel van conventionele magnetische 
media voor massale dataopslag gaan 
vervangen. Maar het is zeker geen me- 
dium, dat in het kantoor nu direkt een 
zeer brede toepassing zal hebben. 
Naast telefoonboek, naslagwerk, gele 
gids en dergelijke zijn er maar beperkte 
mogelijkheden. Pas met de komst van 

beschrijfbare optische media komt er 

. ... . ■ .. . . . 

het heie archiveringsgebied bij. 

De meeste toekomst heeft de CD-ROM 
of de CD-I in de sfeer van de huiselijke 
gebruikers en van bibliotheken en on- 
derwijslns tellingen. Daar zijn de aantal¬ 
len gebruikers groot en hoeft de infor¬ 
matie niet zo actueel te zijn, dat de 
produktietijd van de CD een belemme- 

ring vormt. 

& 
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In deze aflevering zullen we zien hoe je programma’s kunt samenstellen uit subrouti- 
nes, oftewel modules. Dat heeft twee voordelen. Ten eerste komt het de controle over 
het programma ten goede en ten tweede bespaar je jezelf veel programmawerk, omdat 
je een enkele subroutine vaak meerdere keren in een programma kunt gebruiken. 


Programmeren in 
machinetaal 



W e beginnen deze keer met 
wat huishoudelijke medede¬ 
lingen. Aan wie deze serie 
regelmatig heeft gevolgd, zal 
het duidelijk zijn, dat hij is 
gericht op mensen, die minstens rede¬ 
lijk uit de voeten kunnen met Basic of 
een andere ”hogere” programmeertaal. 
Voor vele lezers, met belangstelling 
voor machinetaal, is dat echter een te 
hoge drempel. Vandaar dat er in Com¬ 
modore Info binnenkort een cursus ma¬ 
chinetaal van start zal gaan, die bedoeld 
is voor de absolute beginner. 

De serie Programmeren in Machinetaal 
gaat op veler verzoek echter ook door, 
maar er zal niet meer in elk nummer van 
Commodore Info een aflevering komen te 
staan. Voorlopig is de afspraak gemaakt, 
dat je mijn serie vanaf nu alleen in de 
oneven nummers zult tegenkomen. Ik zal 
(blijven) schrijven over onderwerpen, die ik 
zelf interessant vind en waarvan ik meen 
verstand te hebben. Wat dat betreft, zal er 
dus niets veranderen. 


Een fabriek 

Als inleiding tot het gebruik van subrouti- 
nes, volgt er nu een gelijkenis. Stel, je gaat 
oen fabriek beginnen, die kant en klare 
huizen produceert. Elke zichzelf respecte¬ 
rende fabriek hoort een lopende band te 
hebben, dus je bestelt er een. Je laat een 
huis ontwerpen, maakt er een aantal mal¬ 
len van en je kunt gaan produceren. 

De mallen worden over de band vervoerd. 


Meneer A giet er bakstenen in, 
meneer B deuren en ramen en me¬ 
neer C dakpannen. De huizen zijn nu 
gestold en meneer D haalt ze uit de 
mallen, waarna juffrouw E ze inpakt. 
De lege mallen komen weer bij me¬ 
neer A terecht. De productiecirkel is 
rond en aan het eind van de week heb 
je een voorraad perfecte huizen. 

De verkoop loopt goed en je ontdekt 
een ander gat in de markt. Er is vraag 
naar precies hetzelfde huis, maar dan 
met een andere voordeur. De produc¬ 
tie van huis 1 moet door blijven gaan, 
dus je bestelt een nieuwe lopende 
band en laat nieuwe mallen maken. 
Vijf jaar verder heb je honderd lopen¬ 
de banden, die allemaal andere hui¬ 
zen produceren. Deze huizen wijken 
allemaal op slechts 1 punt af van huis 
1. De manier waarop de fabriek nu 
draait, komt je inefficiënt voor en je 
besluit te gaan reorganiseren. 

De fabriek wordt opgesplitst in drie 
afdelingen. Op afdeling 1 gaan op 
afzonderlijke banden bakstenen, deu¬ 
ren, ramen en dakpannen geprodu¬ 
ceerd worden. Op afdeling 2 stelt 
men uit deze onderdelen verschillen¬ 
de soorten muren en daken samen. 
Tenslotte worden op afdeling 3 uit de 
muren en daken huizen in elkaar 
gezet. 

De laatste productiemethode heeft 
twee grote voordelen ten opzichte 
van de eerste. 


0 REM SPRING 1 


100 

103 

FRINT CHRfct147) 
PRINT "RESULTATEN 

NEW YORK" 


105 

PRINT* PRINT 



1 10 

T=0 



120 

POR X =1 TO 5 



130 

PRINT "RESULTAAT 

DEELNEMER";X; 


140 

INPUT R ( X ) 



150 

T=T+R(X) 



160 

NEXT X 



170 

PRINT "GEMIDDELD 

RESULTAAT 

" ; T/5 

175 

FÜR A=1 TO 2000: 

NEXT A 



REM 



190 

REM 



200 

PRINT CHR$( 147 ) 



203 

PRINT "RESULTATEN 

PARIJS" 


205 

PRINT: PRINT 



210 

T-0 



220 

FOR X=1 TO 5 



230 

FRINT "RESULTAAT 

DEELNEMER";X; 


240 

INPUT R(X) 



250 

T=T+R(X) 



260 

NEXT X 



270 

FRINT "GEMIDDELD 

RESULTAAT 

" ; T/5 

275 

FUR A=1 TO 2000: 

NEXT A 


280 

REM 



200 

REH 



300 

PRINT CHR$( 147) 



303 

FRINT "RESULTATEN 

DEDEMSVAART" 


305 

PRINT: PRINT 



310 

T=0 

* 


320 

FOR X=1 TO 5 



330 

PRINT "RESULTAAT 

DEELNEMER"?X; 


340 

INPUT R(X) 



350 

T=T+R(X) 



360 

NEXT X 



370 

PRINT "GEMIDDELD 

RESULTAAT 

"; T/5 

375 

FOR A— 1 TO 2000:.. 

NEXT A_ 


380 

END 




Het eerste voordeel is de toegenomen dbntrole 
over de productie. Als van een bepaald huis de 
deur bijvoorbeeld niet bevalt, stop je alleen de 
lopende band, die de betreffende deur maakt 
en je bestelt een andere deurenmal. De produc¬ 
tie van de andere onderdelen voor het huis kan 
gewoon door blijven gaan, evenals de samen¬ 
stelling van de andere drie muren en het dak. 
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Het tweede voordeel is, dat je één en 
dezelfde produktielijn voor de samenstel¬ 
ling van verschillende huizen kunt gebrui¬ 
ken. De bakstenen-band levert bijvoor¬ 
beeld aan alle huizen een bijdrage. 

Om het in ondernemerstermen uit te druk¬ 
ken: de investeringskosten per huis zullen 
tot een minimum gereduceerd zijn en de 
flexibiliteit van de productie zal maximaal 
zijn geworden. De arbeidskosten zullen 
gelijk blijven of mogelijk iets toenemen. 
Het geheel dient namelijk te worden ge¬ 
coördineerd, wat bij de eerste methode 
niet nodig was. 

Subroutines 

Na deze gelijkenis van ”de twee verschil¬ 
lende productiemethoden” zullen we de 


500 PRINT: PRINT 
510 T=0 

520 FOR X= 1 TO 5 

530 PRINT “RESULTAAT DEELNEMER";X; 
540 INPUT R(X) 

550 T=T+R(X) 

560 NEXT X 

570 PRINT “GEMIDDELD RESULTAAT "JT/5 

580 FOR A=1 TQ 2000: NEXT A _ 

590 RETURN 


lijn eens doortrekken naar het schrijven 
van programma’s. 

Elke computer kent de mogelijkheid om te 
werken met subroutines. Een subroutine is 
een afgerond onderdeel van een program¬ 
ma. Subroutines kunnen op hun beurt ook 
weer subroutines aanroepen. We spreken 
dan van recursie. De al eerder genoemde 
voordelen van het werken met subrouti¬ 
nes, controle over het programma en het 
besparen van programmeerwerk, zullen 
blijken uit de volgende twee Basic-pro- 
gramma’s. Ze doen precies hetzelfde, 
maar zijn op verschillende manieren ge¬ 
schreven. 

In de drie wereldsteden New York, Parijs 
en Dedemsvaart worden ver-springwed- 
strijden gehouden. Aan de wedstrijden 
doen 5 deelnemers mee. Per wedstrijd 
moet de gemiddelde sprongafstand van 
de deelnemers worden berekend. 
Programma 1 berekent de gemiddelden 
volgens de ”botte bijl- methode”. Deze 
methode vertoont veel overeenkomsten 
met de eerste productiemethode van hui¬ 
zen. Voor elke wedstrijd wordt de gemid¬ 
delde sprongafstand met dezelfde op¬ 
drachten berekend. We hebben drie wed¬ 
strijden, dus de opdrachten komen drie 
keer in het programma voor. Deze iden¬ 


tieke opdrachten staan in kaders ge¬ 
plaatst. Als er honderd wedstrijden gehou¬ 
den zouden worden, zou je 100 groepen 
identieke opdrachten krijgen. 

Programma 2 pakt de zaken wat handiger 
aan. Hij zet de opdrachten, die het gemid¬ 
delde berekenen in een subroutine vanaf 
regel 500. Bij elke wedstrijd wordt de sub¬ 
routine aangeroepen met GOSUB 500. 
Deze methode komt overeen met de twee¬ 
de productiemethode van huizen. De op¬ 
drachten, die het gemiddelde berekenen, 
staan maar 1 keer in het programma. Als er 
100 wedstrijden zouden worden gehou¬ 
den, zou dezelfde subroutine 100 keer 
worden aangeroepen. 

We hebben nu veel meer controle over het 
programma. Als we om de een of andere 
reden de subroutine willen uitbreiden, zou 
dit de samenstelling van het aanroepend 
programma niet veranderen. We herschrij¬ 
ven dan uitsluitend subroutine 500. Om 
een parallel te trekken naar de huizenpro¬ 
ductie; je hoeft nu geen nieuw huis te 
maken, als alleen de voordeur niet deugt. 
Verder besparen we ons programmeer¬ 
werk (in dit geval intikwerk). De subroutine 
hoeft maar 1 keer te worden geschreven. 

Modulair of gestructureerd 

In computerkringen hoor je vaak de term 
"gestructureerd programmeren”. Taalkun¬ 
dig gezien, is dat een onjuiste uitdrukking. 
In elk programma zit een bepaalde struc¬ 
tuur zodat de toevoeging net zo goed 
achterwege kan blijven. 

Wat er in feite wordt bedoeld, is het sa¬ 
menstellen van programma’s uit subrouti¬ 
nes. "Modulair programmeren” zou hier¬ 
voor een betere benaming zijn. Daarbij 
dient dan te worden aangetekend, dat het 
in elke computertaal mogelijk is om modu¬ 
lair te programmeren. Talen als Pascal en 
C maken het je in dat opzicht echter wat 
makkelijker dan Basic of machinetaal. 

Trap 

In machinetaal roep je een subroutine aan 
met de opdracht JSR en spring je terug 
naar de aanroepende routine met RTS. Het 
gebruik van subroutines wordt verduide¬ 
lijkt met het machinetaal-programma van 
deze aflevering. Dit programma tekent met 
verschillende karakters een trap op het 
beeldscherm. 

In de lijst met subroutines tref je achter¬ 
eenvolgens aan: het adres van de routine, 
de naam en een code. Het eerste cijfer van 
de code heeft betrekking op het niveau 
van de subroutine. Is dit cijfer een 0, dan 
wil dat zeggen, dat de subroutine zelf geen 
subroutines aanroept. Is het 1, dan wordt 
aangegeven dat de routine alleen subrouti¬ 
nes van niveau 0 aanroept. Bij een 2 roept 
de routine minstens 1 subroutine aan, die 
op niveau 1 ligt. De rest is van niveau 0 of 1. 


Met andere woorden; het niveau van een 
routine ligt altijd 1 niveau hoger dan dat 
van de subroutine met het hoogste niveau, 
die hij aanroept. De illustratie van de sub- 
routine-pyramide geeft het trouwens dui¬ 
delijker aan dan deze ingewikkeld klinken¬ 
de handleiding. 

Het tweede cijfer van de code nummert 
routines, die op hetzelfde niveau liggen. 


10 FOR X=20480 TO X+127 
20 READ Y: POKE X.Y: NEXT X 
30 SYS 20583: END 

100 DATA230,253, 165,253, 160,0, 145,251 
110 DATA96,96,24, 101,251, 133,251, 169 
120 DATA0 , 101,252, 133,252,96,96, 162 
130 DATA4, 160,255, 136,208,253,202,208 
140 DATA250,96,96, 169,40,32,10,80 
150 DATA96,96, 169, 1,32, 10,80,96 
160 DATA96, 189,5, 133,254,32,35,80 
170 DATA32,0,80,32,23,60, 198,254 
180 DATA208,243,96,96, 169,8, 133,254 
190 DATA32,42,80,32,0,80,32,23 
200 DATA80,138,254,208,243,96,96, 169 
210 DATA5,133,255,32,49,80,32,68 
220 DATA80,138,255,208,246,96,96,32 
230 DATA68,229, 160,3, 162,216, 132,252 
240 DATA 134,251,32,87,80, 165, 197,201 
250 DATA4,208,239,32,68,229,96,96 


Laten we de subroutines eens één voor 
één bekijken. We beginnen op niveau 0. 

ZET 

Het commando ”ZET”, zet de inhoud van 
lokatie $FD op het scherm. $FD wordt aan 
het begin van de routine verhoogd, dus het 
karakter zal er telkens anders uit zien. De 
pointer op $FB/$FC wijst naar de plaats op 
het scherm waar het karakter komt te 
staan. 

PLUS 

”PLUS” telt de inhoud van het A-register 
op bij pointer $FB/FC. "PLUS” wordt aan¬ 
geroepen door "PLUS 40” en "PLUS 1”. 

WACHT 

"WACHT” houdt een vertragingslus in. 
Zonder deze lus zou de trap te snel worden 
getekend. Hoe hoger de inhoud van het X- 
en Y- register, hoe groter de vertraging. 


PROGRAMMA TRAP 

LIJST 

VAN SUBROUTINES 

ADRES 

NAAM 

CODE 

5000 

ZET 

0. 1 

500A 

PLUS 

0.2 

5017 

WACHT 

0.3 

5023 

PLUS 40 

1 . 1 

502A 

PLUS 1 

1.2 

5031 

5 NEER 

2. 1 

5044 

8 RECHTS 

2.2 

5057 

TRAF 

3. 1 

5067 

HOOFD 

__ 

4. 1 


0 REM SPRING 2 
100 PRINT CHR$(147) 

103 PRINT "RESULTATEN NEW YORK" 

105 GOSUB 500 
200 PRINT CHR$( 147 ) 

203 PRINT "RESULTATEN PARIJS" 

205 GOSUB 500 

300 PRINT CHR$( 147) 

303 PRINT "RESULTATEN DEDEMSVAART" 

305 GOSUB 500 

310 END 

320 REM 

330 REM 
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PROGRAMMA TRAP 


NIVEAU’S VAN DE SUBKOUTINES 



PLUS 40 

”PLUS 40” laadt het A-register met de 
waarde $28 (40) en roept vervolgens 
”PLUS” aan. Er gaan 40 tekens op een 
schermregel, dus de schermpointer zal na 
”PLUS 40” een regel zijn gezakt. 

PLUS 1 

Ook ”PLUS 1 ” roept PLUS aan. Deze keer 
zal de schermpointer een plaats naar 
rechts zijn gegaan. 

5 NEER 

”5 NEER” tekent een verticaal element van 
de trap. Zoals de naam al zegt, komt dit 
neer op vullen van 5 schermvlakjes onder 
elkaar met karakters. De routine roept ach¬ 
tereenvolgens ”PLUS 40” , ”ZET” en 
”WACHT” aan. $FE houdt bij hoeveel vak¬ 
jes we hebben gehad. 

8 RECHTS 

”8 RECHTS” tekent een horizontaal ele¬ 
ment van de trap. 8 schermvakjes naast 
elkaar worden gevuld met karakters. 
”PLUS”, ”ZET” en ”WACHT” worden aan¬ 
geroepen. $FE dient weer als teller. 

TRAP 

’TRAP” roept 5 keer achter elkaar ”5 neer” 
en ”8 rechts” aan. Dit heeft als gevolg, dat 
de trap wordt getekend. $FF houdt bij 
hoeveel treden we hebben gehad. 

HOOFD 

”HOOFD” is de hoofdroutine. Hiermee 
wordt het programma gestart. Met JSR 
$E544 wordt het schema schoongeveegd. 
Vervolgens wordt de pointer op $FB/$FC 
geinitialiseerd. Deze moet gelijk zijn aan 
het adres van het vakje linksboven in beeld 
min 40, omdat ”5 NEER” begint met het 
verhogen van de pointer en pas dan ”ZET” 
aanroept. Het resultaat van deze aftrek¬ 
king is ($04000-$28=) $C3D8. 

Vervolgens wordt ’TRAP” aangeroepen. 
De trap wordt getekend. De inhoud van 
$C5 wordt daarna opgevraagd. Als deze 
gelijk is aan 3, dan is funktietoets 1 inge¬ 
drukt en het programma stopt. Is F1 niet 
ingedrukt, dan springen we weer naar de 
pointer- initialisatie en de trap wordt herte- 
kend met andere karakters. 

Tot zover deze aflevering over het gebruik 
van subroutines. S.Bakker • 
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Gebruikersgroepen 


De VCGN (070-950779) is de oudste Com¬ 
modore gebruikersvereninging en heeft 
iedere laatste zaterdag van de maand in 
het Lodewijk Makeblijde lyceum, Haag- 
weg 155 in Rijswijk haar grote bijeen¬ 
komst. 

Inlichtingen over de vele afdelingen kunt u 
krijgen via: 

Zeeland 01180-25746 West-Brabant 
01640-42404 Midden-Brabant 01612- 
54242 Oost-Brabant 04120-42054 Zuid- 
Limburg 04490-19946 Zuid-Holland 078- 
135739 

PET Benelux heeft bijeenkomsten in Zeist 
(Ie zaterdag), Nijmegen (2e zaterdag) en 
Haaksbergen (3e zaterdag). (Inl.05759- 
2211 ). 

De HCC Commodore 

, 03404-59599. 


2e zaterdag van de maand en ook activitei¬ 
ten in Zwolle (038-548459), Midden Neder¬ 
land (03453-1375) en Deventer (05700- 
50758). 

CCCB is één van de clubs uit Belgie, met 
afdelingen in Antwerpen, Limburg, West- 
Vlaanderen, inl. Bindstr. 19, te 2600 Ber- 
chem Antwerpen. Lid worden door stor¬ 
ting 500 fr op 405-5092171-90 tnv. 
CCCBA. 


,, waar 

men iedere twee weken op dinsdag cluba¬ 
vonden organiseert en ook cursussen 
geeft. Inl. Hofsingel 259 te 6834 GH Velp, 
tel. 085-647782. 


I 





HOT NEWS van SCN uit Amsterdam, lang¬ 
zamerhand de grootste vereniging van ons 
land, (03450-16051), heeft haar maande¬ 
lijkse bijeenkomst in de Meervaart op 




Ie donderdag een bij- 
inlichtingen A. vd Klaauw 
@01719-16720. 


ct'u. 


gffggf 


In Knokke Is er iedere vrijdag een bijeen¬ 
komst In Café Montyu. 
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De Amiga is een grafische gigant. Daarvan kon iedereen zich op de vele beursdemo- 
straties overtuigen. Stuiterende ballen en prachtige spelen van het Amerikaanse 
softwarehuis Electronic Arts sierden daarbij de HIRES-monitoren. Onlangs werden 
diverse grafische pakketten voor de Amiga gelanceerd. Wij bekeken voor u het 
veelbelovende Deluxe Paint van EA. 

DE LUXE PAINT 



Een krachtig” 
grafisch 

Amiga-pakket 

D e Amerikaanse softwarehuizen 
Aegis en Electronic Arts hebben 
zich enthousiast toegelegd op 
het ontwerpen van grafische- , 
animatie-en video construction 
software voor Commodores Amiga. 
Vooral EA-president "Trip” Hawkins is 
daarbij de drijvende kracht. Het 
nieuwste Electronic Arts produkt is De¬ 
luxe Paint, een krachtig grafisch program¬ 
ma waarbij de mogelijkheden van andere 
Personal Computers verbleken. 

Ook Deluxe Paint werd speciaal voor de 
Amiga ontworpen. Het pakket werkt zowel 
in de lage (320 x 200 pixels)-, als in de 
normale (320 x 400 pixels)- en in de HIRES 
(640 x 400 pixels)- mode. Het aantal werk- 
kleuren bedraagt 32 tot 16 en het aantal 
mengkleuren maximaal 4096. 

De muisbesturing en de toepassing van 
trekmenu’s in vensters maken de be¬ 
diening eenvoudig. Meestal is klikken op 
het desbetreffende ikoonsymbool vol¬ 
doende om de gevraagde keuze te acti¬ 
veren. 

Het ikonenmenu 

Amiga’s veelzijdige werkbank, Intuition, is 
een schoolvoorbeeld van gebruiks¬ 
vriendelijke ikonenbesturing. Ook het keu¬ 
zemenu van Deluxe Paint werkt met handi¬ 
ge ikonen en ”pull-down”-menu’s. 

Rechts op het beeldscherm staan de iko¬ 
nen voor penselen, tekenen, vaste vor¬ 
men/figuren, het kleurenpalet enz. Het eer¬ 
ste ikoon biedt een keuze uit verschillende 
penseeltypen: Vier vierkante, vier ronde en 
twee groepen punten (Air Brush). De keu- 
zeactivatie gaat met de linker muisknop. 


Bent u niet tevreden over de maat van de 
geboden penselen dan geeft een klik met 
de rechter muisknop op een penseel het 
woord Size onder deze kwast. Met de muis 
kan de artiest vervolgens de digitale haren 
de gewenste omvang geven. 

Het Freehand Dotted Drawing-ikoon 
geeft bij selectie het tekenen van punten 
uit de losse pols. Met Free Hand Continu- 
ous Drawing trekt u, zoals de naam al 
aangeeft, volledig vrij vloeiende lijnen op 
het scherm. Curved- en Straight Lines 
trekken respectievelijk gebogen- en en 
rechte lijnen. Voor het creëren van gebo¬ 
gen lijnen kan de gebruiker met de muis 
gewoon bestaande rechte lijnen in de ge¬ 
wenste vorm of bocht buigen. 

De ikonen voor vierkanten, cirkels, ovalen 
en veelhoeken bezitten een dubbele func¬ 
tie: Klik de muis in op de lege helft van de 
gewenste figuur en er verschijnt prompt 
een lege vorm, bijvoorbeeld een cirkel, in 
beeld. Zet u echter de muiscursor op de 
gevulde helft en klikt in, dan verschijnt een 
Filled (gevulde) cirkel op het scherm. Deze 
Fill-functie werkt in de praktijk erg snel. 
De Air Brush-ikoon werkt net als een echte 
spray. Een pufje brengt een prachtig glad 
vlak in de gekozen kleur aan. 

De Selection Tool-ikoon wordt gebruikt 
voor het activeren van de cut- en paste- 
functies via de rechter muisknop. Klikken 


plus copy. 

Een speciaal Grid-ikoon brengt een on¬ 
zichtbaar rasterwerk aan waarbij uitslui¬ 
tend lijnen tussen de bestaande gridpun- 
ten getrokken kunnen worden. Dit ikoon is 
ideaal voor het maken van grafieken en 
diagrammen. 

De menubalk boven in het beeld werkt via 
de rechter muisknop. Hiermee kunt u de 
meer algemene werkopties zoals laden en 
saven van platen en ontworpen penselen 
kiezen. 

Verder biedt Deluxe Paint nog een apart 
Frontmenu met 11 verschillende fronts 
(=tekststijlen) voor het toevoegen van 
teksten. Er is helaas geen word wrap. 

De tekenmodes 

Deluxe Paint kent zeven drawing modes: 
Mask, Color, Replace, Shade, Smear, 
Blend en Cycle. Alle waardevolle gereed¬ 
schappen voor de grafische artiest. 

Mask- Color- en Replace-functies dienen 
voor het opbrengen van penseelstreken. 
Mask schakelt de achtergrondkleur uit 
door deze transparant te maken. De pen¬ 
seel brengt uitsluitend de gekozen voor¬ 
grond kleuren op het scherm aan. Zo kunt 
u zich volledig op het het te "schilderen” 
object concentreren. 

Replace maakt de achtergrondkleur weer 
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zichtbaar. Daarbij kan de artiest de oude- 
of een nieuwe achtergrondkleur nemen. 
Met Color kiest de kunstenaar een nieuwe 
voorgrondkleur uit het palet. 

Stel u tekent met geel en rood op een 
blauwe achtergrond. In Mask schildert de 
penseel dan met geel en rood op een 
doorzichtige achtergrond. Replace brengt 
de blauwe achtergrond weer terug. Met 
Color maakt u de kleuren geel en rood 
bijvoorbeeld oranje en groen. 

De Smear-, Blend- en Shade-functies zijn 
zogenaamde mengopties. Dat wil zeggen 
zij mengen de nieuw opgebrachte kleuren 
met de reeds op het scherm aanwezige, en 
nu onderliggende, kleuren. Zo kunt u vrij¬ 
wel elke nuance creëren. 

Smear smeert kleuren alsof u ze met een 
vinger door elkaar mengt. Deze methode 
werkt bijzonder attractief bij de overgang 
tussen twee verschillend gekleurde objec¬ 
ten. Zij kunnen aan de randen als het ware 
in elkaar over gesmeerd worden waardoor 
een vloeiende overgang ontstaat. Hier kan 
de echte artiest zijn of haar hart op halen! 
Shade maakt het mogelijk om verscheide¬ 
ne tinten van een kleur naast elkaar weer te 
geven. Bijvoorbeeld een vierkant dat van 
licht- naar donker blauw verloopt. Blend is 
een subtielere vorm van Smear. Geeft een 
heel geleidelijke kleurovergang. Gaat u 
bijvoorbeeld over van Rood naar geel dan 


schept Blend aantrekkelijke oranje tussen- 
schakeringen. 

Tot slot Cycle. Deze optie maakt schijnani- 
maties door middel van cyclische kleurve¬ 
randeringen. Een treffend voorbeeld is de 
watervaldemo op de Deluxe Paint disk. 

Speciale mogelijkheden 

Deluxe Paint biedt de liefhebber een groot 
aantal professionele mogelijkheden; 
w-Mirror; Het spiegelen van grafische ob¬ 
jecten kan om maarliefst 40 verschillende 
assen. Een kaleidoscoop maken is daarbij 
een fluitje van een cent. Behalve een of 
meerdere grafische objecten laat ook het 
gehele scherm zich om een as roteren en 
spiegelen. 

n-Fast Feed back maakt het mogelijk om 
met de gewone cursor een te tekenen 
object op de gewenste plaats te zetten en 
het daar pas met een grotere penseelcur- 
sor uit te werken. Deze methode bespaart, 
ten op zichte van conventionele tekenpro¬ 
gramma’s behoorlijk wat tijd. 

■*- Hue Control voor het veranderen van de 
paletkleuren. 

w- Undo maakt de laatst gedane handeling 
ongedaan. 

■vHet is mogelijk om in twee tekenge- 
bieden tegelijk te werken. Daarmee is De¬ 
luxe Paint het eerste tekenprogramma dat 
erkent dat de gebruiker twee handen 
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heeft. Op het tweede tekenscherm kunnen 
ook tijdelijk figuren voor direkt gebuik ge¬ 
saved worden. 

■r-Volledige beheersing van de penseel- 
vorm. Bijvoorbeeld verdubbelen, halveren, 
horizontaal/vertikaal vergroten/verkleinen, 
uitrekken, en verbuigen. Voor de meeste 
veranderingen is slechts een toets indruk¬ 
ken voldoende. 

wGyclic spiegelt alle punten in dezelfde 
richting als het gekozen controlepunt. 
^-Magnify maakt het mogelijk om een 
bepaald schermdeel nader te bekijken. 
Magnify zelf splitst het scherm in twee 
delen met de close up rechts in beeld. De 
zoom-ikoon draagt zorg voor de mate van 
vergroting. • 


EA’s Deluxe Paint biedt de Amiga- 
graficus en -kunstenaar een schat aan 
mogelijkheden die voorheen slechts op 
peperdure mainframes beschikbaar 
waren. Ook de diamaker en videopro- 
ducer zal Deluxe Paint goed voor het 
maken van titels en grafische effecten 
kunnen gebruiken. Voor hen is het jam¬ 
mer dat Deluxe Paint geen echte ani-. 
matie bezit. 

Dit krachtige tekenpakket zal in de win¬ 
kel rond de ƒ240,- gaan kosten. Een 
koopje voor de liefhebber. 


PRINTERS 


Met meer dan 50% korting èn een vol jaar garantie! 



De Brother HR5C printer is een 
80-koloms matrixprinter, 100% 


Commodore compatibel. Door de 
thermische printkop is de HR5C 
een betrouwbare en geruisloze 
printer. Drukt op gewoon papier 
met lint of op thermisch papier 
zonder lint. De letterkwaliteit is bij¬ 
zonder hoog door een 9x9 matrix. 


Snelheid 30 tekens per seconde, 
bidirectioneel, volledig grafisch 
aanstuurbaar. De HR5C wordt 
geleverd met twee linten, rol 
papier, rolhouder, seriële Commo¬ 
dore kabel en batterijen. 

De Brother HR10C is een kwali- 
teitsprinter voor tekstverwerking, 
speciaal ontwikkeld voor alle 
Commodore systemen. De HR10C 
geeft dezelfde schrijfmachinekwa- 
liteit als zijn grotere professionele 
broers de HR15, HR25 en HR35. 
Snelheid 12 tekens per seconde, 
bidirectioneel, onderstrepen, vet¬ 
en schaduw afdrukken en diverse 
andere aansturingscodes. 

De HR10C wordt geleverd met een 
lintcassette, verwisselbaar letter- 
wiel (96 tekens), seriële Commo¬ 
dore kabel, netvoeding, Neder¬ 
landse handleiding. 



j- 

De optionele tractorfeed t.b.v. ket- 
tingformulieren kost f 145,--. 
SERVA stuurt u deze printers 
onder rembours of vooruitbetaling 
voor f 399,-- resp. f 495,-- inclusief 
BTW. 

Bel SERVA 055 - 222 644* en be¬ 
stel nog vandaag, de voorraad is 
beperkt! Afhalen in onze compu¬ 
terwinkel kan natuurlijk ook. 



CnmPUTER BU5ME55 CEIlTEfl 

Nieuwstraat 249 - Postbus 408 - 7300 AK Apeldoorn - Telefoon 055 - 222 644* - donderdag koopavond. 
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Het zelf besturen van een luchtreus of sportvliegtuigje is een wens die voor menige 
luchtvaartenthousiast nooit in vervulling zal gaan. Met een vluchtsimulator is het echter 
mogelijk om een deel van de vliegsensatie op het beeldscherm over te brengen. Voor 
alle captains in spe bekeken wij enkele C64/128- vluchtsimulatoren. 

VLUCHTSIMULATOREN 



D e mens houdt zich al eeuwen 
met de kunst van het vliegen 
bezig. In de Renaissance tijd 
ontwierpen befaamde kunste¬ 
naars ai ingenieuze vliegcon- 
structies. Deze vaak vogelachtige 
bouwsels kwamen echter nimmer aan 
daadwerkelijk vliegen toe. 

Tegen het einde van de negentiende 
eeuw werden de eerste mechanische 
vliegtuigen operationeel. Iedereen kent 
wel de namen van luchtvaartpioniers 
zoals de gebroeders Wright en niet te 
vergeten Anthony Fokker. Hun houtje- 
touwtje machines deden de mensheid 
de vleugels uitslaan. 

Aanvankelijk was het vliegen voorbehou¬ 
den aan de happy few. Na de tweede 
oorlog maakte de burgerluchtvaart een 
stormachtige groei door en bij het huidige 
massatoerisme per vliegtuig is ”het gevlo¬ 
gen hebben” al lang geen uitzondering 
meer. 

Dat "gevlogen hebben” blijft in verreweg 
de meeste gevallen passief. Zelf vliegen is 
buitensporig duur en de opleiding tot ver¬ 
keersvlieger is slechts aan weinigen voor¬ 
behouden. Gelukkig kan de Commodore- 
bezitter voor een luttel bedrag zelf achter 
de stuurknuppel plaatsnemen. Met behulp 
van een vluchtsimulator wordt het huiska- 
mervliegen werkelijkheid. 

Vluchtsimulatoren 

Vluchtnabootsers zijn ontwikkeld ten be¬ 
hoeve van de vliegeropleidingen. Het 


Met de Commodore aan 
de stuurknuppel 


Solo Flight 


daadwerkelijk leren vliegen kost een hoop 
brandstof, houdt risico’s voor het vliegtuig 
en bemanning in, en de gewenste oefen¬ 
problemen of weersomstandigheden zijn 
niet altijd voorhanden. Een vluchtsimulator 
verbruikt geen kerosine, is 100% veilig en 
kan vrijwel elke denkbare vliegsituatie na¬ 
bootsen. 

Vluchtsimulatoren stammen eigenlijk al uit 
de twintiger jaren. Een zekere Ed Link, van 
huis uit een orgel- en harmonicabouwer, 
ontwierp de zogenaamde ”bucking bron- 
co”. Een hobbelend minivliegtuigje met 
vleugels en staart voor droogvlieg instruc¬ 
tie. De huidige computer gestuurde vlucht¬ 
simulatoren lijken meer op containers dan 
vliegtuigen. 

Een van de bekendste fabrikanten van 
vluchtsimulatoren voor de burger- en mili¬ 
taire luchtvaart is Redifusion Simulation uit 
Sussex, Engeland. Dit bedrijf bouwde in 
1950 de eerste Europese vluchtsimulator 
voor de Boeing 377 Stratocruisers. Mo¬ 
menteel heeft Redifusion meer dan 300 
professionele vluchtsimulatoren aan de 
luchtvaartmaatschappijen geleverd. Zo’n 
veelzijdige simulator voor dag/nacht- en 
slecht zicht-werk komt de opdrachtgever 
op een slordige 25 miljoen gulden. Overi¬ 
gens kan een dergelijke geavanceerde si¬ 
mulator de komplete vliegeropleiding ver¬ 
vangen en die kwam toch ook om en na bij 
de miljoen per vlieger. 

Voor Commodore-huiskamergebruik zijn 
er diverse vluchtsimulatoren en simulator¬ 
achtige spelen verkrijgbaar. Vanaf het 
vliegen met kleine sportvliegtuigjes tot 
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Spaceshuttle: Activision 


echte verkeersvliegtuigen. En als nieuwste 
genre is de Space Shuttle-simulatie in 
opkomst. Behalve vluchtsimulatoren zijn 
er ook verkeersleidingsprogramma’s te 
koop. Daarmee kan thuis het luchtverkeer 
boven en om een bekende luchthaven in 
goede banen geleid worden. 

De instrumenten 

Bij het starten van een vluchtsimulator 
wordt de beginner, de leek, die ook wel 
eens wil vliegen, direkt geconfronteerd 
met een verwarrende hoeveelheid instru¬ 
menten en indicatorlampjes. Een goed be¬ 
grip van deze instrumenten en indicatoren 
is noodzakelijk om te kunnen vliegen en de 
vliegopdrachten tot een goed einde te 
kunnen brengen. Alleen gas geven en aan 
de joystick-stuurknuppel rukken leidt 
slechts tot crashes, zeker bij de betere 
programma’s! 

Gelukkig zijn de meeste vliegsimulatoren 
van een duidelijke, maar wel Engelse, 
handleiding voorzien. Daar velen het (tech¬ 
nisch) Engels niet zullen beheersen en een 
goede Nederlandse vertaling nogal eens 
ontbreekt, zullen wij hieronder de belang¬ 
rijkste wijzers en lampjes kort bespreken: 

☆ De flaps: dit zijn beweegbare vleugelde- 
len die de draagkracht en luchtweerstand 
van de vleugels beinvloeden. De positie 
van de flaps is bepalend voor het stijgen of 
dalen van de kist. Voor het opstijgen 
dienen de flaps omhoog te staan. De ge¬ 
wenste stand, in graden, hangt af van het 
vliegtuigtype. Ook bij de daling worden de 
flaps in een verticale positie gezet. Nu 
werken zij echter voornamelijk als lucht- 
rem. 

Het gebruik van flaps in de verticale stand 
is aan een maximum snelheid gebonden. 
Bij een te hoge snelheid verongelukt uw 
toestel! 

☆ Snelheidsmeters: De snelheid van het 
vliegtuig bepaalt in kombinatie met het 
draagvlak van de vleugels of de kist stijgt, 
gewoon doorvliegt, daalt of in een vrille 
neerstort. Verhoogt u met het toetsenbord 
(meestal toets I van increase) of joystick 
het motorvermogen dan zal de snelheid 
dientengevolge ook toenemen. Houdt 
echter altijd voor ogen dat er bij uitgebrei¬ 


de vluchtsimulatoren meerdere snelheden 
met elk hun eigen betekenis in het spel zijn. 
De luchtsnelheid (Air Speed) geeft, in kno¬ 
pen, de luchtsnelheid langs het toestel 
aan. Daarbij is 100 knopen ongeveer 185 
km per uur. Bij een onvoldoende luchtsnel¬ 
heid kan het toestel niet opstijgen of valt 
ombestuurbaar naar beneden. De lucht¬ 
snelheid bepaalt tevens de mogelijkheid 
tot gebruik van de flaps of het uit staan van 
het landingsgestel. Bij het overschreiden 
van de limiet volgt een crash! 

De verticale snelheid (Vertical Speed) 
geeft de stijg(H-)- of landingssnelheid (-) 
weer. Bij ”0” vliegt u horizontaal. Deze 
snelheid wordt meestal in eenheden van 
100 voet (feet) per minuut weergegeven. 
Sommige simulatoren kennen alleen maar 
een Pitchindicator die aangeeft of het 
vliegtuig stijgt (+), horizontaal vliegt (0), of 
daalt (-). 

De Mach-meter geeft de snelheid als per¬ 
centage van de geluidssnelheid aan. Alle 
toegelaten minimum- en maximum snelhe¬ 
den vindt u in de vliegtuigspecificaties. 

☆ Hoogtemeter: Meldt de hoogte in feet en 
is belangrijk voor het stijgen en dalen. In 
alle gevallen zijn de uit te voeren stijgings- 
en dalingsprocedures afhankelijk van de 
hoogte op dat moment. Bijvoorbeeld de 
aanvlieghoogte bij het naderen van de 
luchthaven of wanneer het motorvermo¬ 
gen bij het opstijgen terug genomen mag/ 
moet worden. 

☆ De windsnelheidsmeter behoedt u voor 
onprettige verassingen. Zij geeft de wind¬ 
snelheid en -richting aan zodat de piloot 
tijdig op een zich veranderende situatie 
kan inspelen. Bijvoorbeeld een andere 
aanvliegkoers om het afdrijven te compen¬ 
seren. 

☆ Motorvermogen; Met de stuwkracht van 
de motoren dient de piloot verstandig om 
te springen. Alleen bij het opstijgen is een 
fors motorvermogen, meestal rond de 
70%, nodig. Voor het gewone vliegwerk is 
rond de 40% voldoende en bij de daling 
zelfs 10%. Te veel motorvermogen leidt tot 
het verspillen van dure brandstof en het 
overschreiden van de snelheidslimiet. Het 
motorvermogen regelt u met de stuur- 
knuppel (= joystick) of toetsenbord. 

☆ Kunstmatige horizon; Dit instrument in¬ 
formeert de piloot over de stand van het 
vliegtuig t.o.v. de grond. Het symboolte- 
ken geeft zowel afwijkingen naar links en 
rechts als omhoog en omlaag aan. Helt het 
vliegtuig bijvoorbeeld naar links dan wijst 
de kunstmatige horizon ook naar links. De 
kunstmatige horizon is van groot belang bij 
het zonder zicht (=blind) vliegen en het 
maken van bochten. 

☆ Baken-indicatoren; Met behulp van 
twee navigatieontvangers kan de piloot 
zijn positie en afstand tot twee (buiten en 
binnen) radiobakens op de grond bepalen. 



737 Flight Simulator 


Bij sommige simulatoren zijn deze bakens 
ook zichtbaar op het radarscherm. 

☆ I.L.S.; Het Instrument Landing System is 
een radionavigatiesysteem dat het vlekke¬ 
loos landen bij slecht zicht of een lage 
aanvliegkoers mogelijk maakt. Op het in¬ 
strumentenpaneel ziet de piloot twee naal¬ 
den (= radiobakensignalen) die in een 
kruis gehouden moeten worden. 

☆ Kompas; Geeft de vliegrichting aan. Het 
kompas dient tezamen met de overige 
plaatsbepalingssystemen geinterpreteerd 
te worden. 

☆ Radar; De radar dient voor het ontwijken 
van het overige luchtverkeer en positiebe¬ 
paling. In sommige gevallen beschikt de 
vluchtsimulator over een lange- en een 
korte afstands-radar. 

☆ Waarschuwingssignalen; Deze kunnen 
per vluchtsimulator verschillen. Wij geven 
hierbij slechts een aantal voorbeelden: 
Landingsgestel (Gear). Snelheidswaar- 
schuwing bij het overschrijden van de des¬ 
betreffende limiet. Stall/Spinning - waar¬ 
schuwing bij een te lage snelheid waar¬ 
door het vliegtuig in een vrille dreigt te 
raken. Motorstoring (Engine Failure). Het 
Ground Proximity Warning System waar¬ 
schuwt tegen het vergeten het landings¬ 
gestel uit te zetten, een onjuiste flapstand- 
en een te hoge snelheid tijdens de daling. 
De Bakenwaarschuwing is voor het pas¬ 
seren van het buitenste aanvliegbaken. En 
natuurlijk is er ook nog de brandstofmeter. 

☆ Stopwatch. Ook dit instrument spreekt 
vanzelf. 

Probeer de betekenis en het belang van de 
verschillende instrumenten goed te begrij¬ 
pen. Dan komt het inzicht in de vliegkunst 
vanzelf. 

Helicopters 

Helicopters zijn een geheel ander soort 
vliegtuig. De beide rotoren hebben zowel 
een vleugel- als een stuwfunctie. dat 
maakt hen niet alleen moeilijker be¬ 
stuurbaar maar tevens ook gevoeliger 
voor vijandige weersomstandigheden. 

Een helicoptersimulator beschikt even¬ 
eens over aanduidingen voor de luchtsnel¬ 
heid, positie, hoogte, brandstof, motorver- 
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North Sea Helicopters 

mogen, windsnelheid, horizon, positiebe¬ 
paling e.d. Extra zijn meestal de volgende 
indicatoren: 

☆ Stand van de hoofdrotorbladen; In de 
rechte stand stijgt de machine. Zodra de 
bladen qen zgn. aanvalshoek (angle) gaan 
innemen,d.w.z. kantelen, zal de helicopter 
gaan bewegen. Bij een kleine hoek be¬ 
weegt de kist naar voren en gaat zij licht 
dalen. Een grote angle doet de helicopter 
naar achter hellen en ook achteruit gaan 
vliegen en stijgen. Voor het zijwaarts 
vliegen moet de helicopter naar de gewen¬ 
ste zijde overhellen. NB.: De kleine rotor 
dient uitsluitend ter stabilisatie van de door 
de hoofdrotor veroorzaakte draaikrachten 
op de helicopter. 

☆ Het aantal omwentelingen per minuut 
van de rotor bepaalt het stijgvermogen van 
de machine. Met het gas (throttle) dient de 
piloot de neiging tot dalen of vliegen naar 
wens aan te passen. 

☆ Collective pitch; l.t.t. de gewone pitch 
gaat het hierbij niet om de stand van de 
vliegtuigneus, maar om de collectieve aan¬ 
valshoek van de wieken. Een positieve 
pitch doet de heli stijgen, een negatieve 
dalen. 

☆ Roll; De pitch naar links en rechts. 

* Indicator voor het slingeren (Yaw) van 
de helicopter. 

C-64/128 vliegsimulatoren voor helicop¬ 
ters zijn momenteel nog niet in Nederland 
verkrijgbaar. 

Veranderingen in de 
vliegsituatie 

Een goede vluchtsimulator heeft de nodi¬ 
ge verzwarende omstandigheden voor de 
leergierige piloot in petto. Nachtvluchten, 
vijandige weersomstandigheden en pech 
kunnen u als captain danig in het nauw 
brengen. Een perfecte landing op de in¬ 
strumenten geeft ter compensatie het 
vliegershart een grote voldoening. 

Voor hen die eens een andere route of 
vliegveld willen, staan twee mogelijkheden 
open: Zelf een vliegveld of scenery ontwer¬ 
pen of de nieuwe locaties op een Library 


disck aanschaffen. Met name in de VS 
ontstaat een ware handel in scenery disks. 

Flight Simulator II 

Flight Simulator II is de bekendste vluchtsi¬ 
mulator voor de C-64/C128 en IBM-PC 
compatibelen. Voor dit rond de ƒ 150,- 
kostende vliegprogramma zijn inmiddels 
diverse aanvullende scenery discs (van 
Sub Logic) leverbaar. 

Flight Simulator II is op cassette en disk 
verkrijgbaar. De documentatie is zeer uit¬ 
voerig. Naast de 180 pagina’s tellende 
Engelse gebruiksaanwijzing krijgt de huis- 
kamerpiloot ook twee uitgebreide naviga- 
tiekaarten. 

In tegenstelling tot de andere hier bespro¬ 
ken vluchtsimulatoren kan het programma 
ook stuntvliegen. Loopings, rollen, duik¬ 
vluchten, Immelmannen en een luchtge¬ 
vecht uit de WO II behoren daarbij tot de 
mogelijkheden. Verder beschikt Flight Si¬ 
mulator II naast alle gebruikelijke instru¬ 
menten over een gedetailleerd I.L.S.-sy¬ 
steem. Ook besteedt deze simulator rela¬ 
tief veel aandacht aan de navigatie die met 
behulp van de scenery discs op tal van 
plaatsen geoefend kan worden. Een na¬ 
tuurlijke horizon helpt bij de oriëntatie. 
Een goede vluchtsimulator voor de serieus 
geïnteresseerden, die de prijs geen be¬ 
zwaar vinden. 

Solo Flight 

In Solo Flight vliegt u een eenmotorig 
postvliegtuigje van en naar zelf te kiezen 
Amerikaanse locaties. Al deze locaties zijn 
vrij natuurgetrouwe kopiën van de echte 
Amerikaanse staten en vliegvelden. 

Ter oefening biedt het programma een 
demo en daarna kan de speler met behulp 
van de functietoetsen zelf een locatie en 
de vluchtomstandigheden kiezen. De een¬ 
voudige toetsencommando’s ”B” voor 
brakes (remmen), ”F” voor flaps, ”L” voor 
gear (landingsgestel), de nummerieke toet¬ 
sen 1 t/m 9 voor het motorvermogen en de 
cursorpijlen voor het gezicht uit de cockpit 



(links/rechts) laten zich gemakkelijk leren. 
De joystick doet de rest. 

Ook Solo Flight is een goede vluchtsimula¬ 
tor met veel aandacht voor de verschillen¬ 
de aanvliegtechnieken, blind vliegen, navi¬ 
gatie en invloed van de weersomstandig¬ 
heden. Gevorderde vliegers kunnen zich 
zelfs aan een motorstoring wagen. 
Soloflight kost op cassette ongeveer 
ƒ 60,-. De diskette is een tientje duurder. 
De Nederlandse MCN-handleiding stelde 
bij ons exemplaar niets voor. De compacte 
Engels gebruiksaanwijzing is gelukkig dui¬ 
delijk en functioneel. 

747 Flightsimulator 

Een spoedcursus jumbojet vliegen met 
slechts twaalf toetsen? Uiteraard gaat het 
hierbij om een simplificatie van de werke¬ 
lijkheid. Als simulator-captain krijg je ech¬ 
ter wel een aardig inzicht van hetgeen 
allemaal bij de besturing van zo’n lucht¬ 
reus komt kijken. 

Net als bij Solo Flight is de toetsenbestu- 
ring gemakkelijk te leren. Ook hier kan de 
piloot door middel van de functietoetsen 
een andere start/landingslocatie kiezen. 
De Engelse gebruiksaanwijzing maakt ge¬ 
degen werk van het aanvliegen op radio¬ 
bakens, I.L.S. en navigatie. 



Deze vluchtsimulator beschikt niet over 
het volledige instrumentenpaneel van een 
747. Dat is gezien de doelstelling van het 
programma ook niet noodzakelijk. Zwaar¬ 
der rekenen wij deze vluchtsimulator aan 
dat de graphics duidelijk beter kunnen en 
het perspectief niet klopt. Ook ontbreekt 
de noodsituatie-optie. 

Indien de gebruiker de beperkingen van 
Flight Simulator 747 doorziet, is deze si¬ 
mulator het prijskaartje van ƒ 150,- (casset¬ 
te) toch wel waard. 

Glider Pilot 

Een vluchtsimulator voor zweefvliegers. 
Het instrumentenpaneel komt in vergelij¬ 
king tot de overige simulatoren magertjes 
over. Een gliderpiloot heeft echter aan een 
hoogtemeter, kompas, variometer, Flight 
Director en snelheidsmeter ruim vol¬ 
doende. 

De bedoeling is om een 160 km lang 
driehoekig parcours af te leggen. In het 
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echt (snelheid ”1”) kost zoiets ruim drie 
uur. De ongeduldigen kunnen de snelheid 
opvoeren. Daarbij wordt het vliegen dieno¬ 
vereenkomstig moeilijker! 

Met behulp van dit programma kunt u iets 
over de thermiek leren. Warmere lucht 
stijgt boven de koudere uit en geeft de 
glider de noodzakelijke lift en daarmee 
zweefhoogte. Helaas bevindt zich onder 
iedere cumuluswolk een opwaartse kracht 
en dat komt niet met de werkelijkheid 
overeen. De wolken op de juiste wijze 
aanvliegen is dus voldoende om in hogere 
sferen te geraken. 

Een langdurige- en soms wat eenzijdige 
vluchtsimulator. De cassette komt u op 
rond de 35 gulden. 

Space Shuttle 

Zij die op het aardse luchtverkeer zijn 
uitgekeken kunnen zich eens aan de be¬ 
sturing van een ruimteveer wagen. Activi- 
sion heeft er van alles aan gedaan om deze 
vluchtsimulator, binnen de beperkingen 
van de C64/128, zo realistisch mogelijk te 
maken. De fraai geillustreerde full color 



vlieghandleiding leidt de astronaut in spe 
stap voor stap door de besturing van de 
Space Shuttle. 

Na het laden van de disk verschijnen het 
instrumentenpaneel en het gezicht vanuit 
het cockpitvenster in beeld. Het menu 
biedt drie niveau’s: Met level 1 kan de 
leerling-ruimtevaarder niet in de fout gaan. 
De astronaut bepaalt alleen de vluchtroute 
en de hoogte, terwijl de boordcomputers 
alle gemaakte fouten tijdig corrigeren. Le¬ 
vel 2 laat een uitgebreidere besturingscon- 
trole toe. De normaal beperkende tijdsfac¬ 
tor is uitgeschakeld en er wordt geen 
brandstof gebruikt. U kunt dan ook het 
vliegen van zo’n shuttle op het dooie ak¬ 
kertje oefenen. Op niveau 3 zullen alle 
gemaakte fouten de veerpiloot zuur opbre¬ 
ken en zakt het brandstofpeil onrustba¬ 
rend. 

Na de realistische lancering, kompleet met 
aftellen, raketgeraas en langsschietende 
wolken, belandt de shuttle in een baan om 
de aarde. Daarna is het uw taak om bij een 
zuinig brandstofverbuik in de juiste baan te 
komen en een rendezvous met satellieten 



te maken. Met behulp van het instrumen- 
tenpaneef moeten destabiliserende facto¬ 
ren zoals pitch, yaw en roll gecorrigeerd 
worden. Een kunstmatige horizon en 
draadkruis helpen bij het centreren van de 
shuttle. Verder beschikt u over radar, snel¬ 
heids- en hoogtemeter, en diverse waar- 
schuwingslampjes. 

De prijs van de Space Shuttle diskette 
bedraagt ongeveer ƒ70,-. 


Stuntvliegen 

Op de Amerikaanse markt is een aantal 
vluchtsimulatoren voor stuntvliegers ver¬ 
krijgbaar. Bijvoorbeeld Stunt Flyer van 
Siërra. Met deze vluchtsimulator kunnen 
alle bekende stunts geshowd, zelf ge¬ 
maakt en de eigen prestaties vanaf de 
grond bekeken worden. Het instrumenten¬ 
bord is zeer volledig en zelfs uitgebreid 
met een aantal extra wijzerplaten die voor 
het verrichten van de stunts onmisbaar 
zijn. De scenery graphics zijn vrij magertjes 
en het geluid beperkt zich tot wat motorge- 
brom. Daartegenover staan de perfecte 
stunts die de aankoop door de liefhebber 
rechtvaardigen. De diskette kost $24,95. 
De amateur-vluchtsimulatoren kunnen het 
besturen van een vliegtuig of ruimteveer 
heel realistisch benaderen. Toch is het 
allemaal net niet echt. Velen zullen met 
name de bewegingssensaties van het 
vliegen toch missen. Niettemin bieden de 
vluchtsimulatoren u op de C-64/C128 de 
unieke gelegenheid om zelf eens de rol van 
captain op zich te nemen! • 


ESIZON 

AUTHORIZED COMMODORE REPAIR CENTRE 

VOOR SNELLE 
REPARATIE 
VAN: 

Cl 28, C64, Cl 6, VIC20 

MONITOREN, PRINTERS, DISC DRIVES 

en 

PCI 0, PC20 

bent u welkom aan de 

Antoniuslaan 1 (Industrieterrein) 
3341 GA H.l. Ambacht 

telefoon 01858-12766 
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In deze serie artikelen wordt hulp geboden bij de eerste stappen op de weg naar het 
maken van goede programma’s voor de Commodore-computers. De taal die daarbij 
wordt gebruikt is Basic. Deze minicursus is met name geschikt voor de beginnende 
computeraar, die nog niet erg ervaren is in het gebruiken van de Commodore, anders 
dan met spelletjes en voorgeprogrammeerde cartridges. De Basic-opdrachten, die 
hier door Jan Bodzinga worden behandeld, geven een duidelijke aanzet tot het zelf 
maken van eenvoudige en minder eenvoudige programma’s. In deze aflevering wordt 
er een spel gespeeld met de Commodore. 


Random spelen 

Basis Basic deel 4. 



I n de vorige cursusdelen hebben we 
de elementaire mogelijkheden onder 
de loep genomen, die we tot onze 
beschikking hebben om de compu¬ 
ter te voorzien van gegevens. De 
belangrijkste Basic-opdracht die we 
hebben leren kennen was INPUT. Hier¬ 
mee bleek het mogelijk om vanaf het 
toetsenbord gegevens te kunnen door¬ 
seinen naar het computergeheugen, die 
daardoor in een programma konden 
worden gebruikt. Daarnaast zijn we de 
begrippen DATA en READ tegengeko¬ 
men, waarmee we -min of meer- varia¬ 
bele gegevens in het Basic-programma 
kunnen opnemen, zonder ze bij het 
RUNnen iedere keer weer van het toet¬ 
senbord te moeten invoeren. 

Een derde mogelijkheid komt in deze afle¬ 
vering aan de orde. De Commodore heeft 
namelijk wat slimme trucjes in huis. We 
kunnen er voor zorgen, dat de computer uit 
zichzelf gegevens maakt en toewijst aan 
een variabele. Zelfs zonder dat wij, als 
programmeur of gebruiker, van te voren 
precies weten, wat die gegevens zullen 
zijn. Dit gaat via de RANDOM functie. 
Deze optie van de Commodore-Basic 
biedt grote mogelijkheden voor het maken 
en spelen van spelletjes. Want wees nu 
eerlijk, als je als maker van een Basicspel 
zelf precies weet hoe alles in z’n werk gaat, 


10 REM = = = = = TOEVAL 1 = = = = = 
20 REM Een programma, waarbij 
30 REM willekeurige getallen 
40 REM door de Commodore worden 
gemaakt. 

50 REM 

100 REM BEGIN PROGRAMMA 
110 PRINT CHR$(147) :REM maak 
scherm schoon 

120 PRINT "Willekeurige getallen” 

125 REM initialisatie 
130 1 = 0 :REM I = teller 
140 GT= RND(-I) :REM GT= toevals- 
waarde 

170 REM GT wordt toevalsgetal 
180 GT = RND(1) 

190 PRINT "Getal I, GT 
200 I = 1+1 

210 IF I < 10 THEN GOTO 180 
220 END 


dan is er weinig aardigheid meer aan, 
omdat je de uitkomst toch al precies weet. 

Een willekeurig getal 

We kunnen onvoorspelbare waardes aan 
een variabele toekennen. We doen dit door 
de opdracht RND(), ofwel RaNDomize te 
gebruiken. 

Random is een engels woord en kan wor¬ 
den vertaald met willekeurig. Met deze 


functie kunnen we door de Commodore 
een willekeurig getal laten genereren, 
waarmee we één of meer variabelen een 
toevallige waarde kunnen geven. Laten we 
dit eerst maar eens bekijken aan de hand 
van een eenvoudig programma. 

Als je dit programma hebt overgetypt en 
gedraaid (altijd eerst even saven!), zul je 
merken, dat naast de dingen die inmiddels 
bekend zijn, zoals het schoonmaken van 
het scherm, dat ook kan door SHIFT/ CLR- 
HOME (regel 110) en het printen van teks¬ 
ten, er nog wel het één en ander extra 
gebeurt door dit stukje Basic. Als eerste 
zien we een hele serie cijfers staan naast 
onze strings "Getal 0", "Getal 1” etc. Ver¬ 
der blijkt ook, dat er niet 1 maar 10 keer een 
getal op het scherm is gezet. 

Programma-uitleg 

Om alles wat duidelijker te maken volgt 
hier regel voor regel de uitleg van dit 
programma. 

De regels 10 tot 100 vormen de kop van 
deze listing, en laten een van de manieren 
zien, waarmee een goed programma moet 
beginnen. Naast de uitleg en de titel van 
het programma is er nog ruimte voldoende 
over om zelf extra bijzonderheden, zoals 
auteur, datum versie etc. in dit gedeelte op 
te nemen. 
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Vanaf regel 100 begint het werkelijke pro¬ 
gramma. Eerst wordt het scherm schoon¬ 
gemaakt. Dit gebeurt door de opdracht 

PRINT CHR$(147). 

Regel 120 schrijft linksbovenaan het 
scherm de titel van dit programma, Wille¬ 
keurige getallen. 

In de regels 130 en 140 worden de twee in 
dit programma te gebruiken variabelen, te 
welen I en GT geinitialiseerd. Hierbij wordt 
een vaste beginwaarde aan de variabelen 
toegewezen, die in de meeste gevallen 0 
(nul) zal zijn. Deze initialisatie- procedure is 
bij Basic niet echt noodzakelijk, omdat na 
het geven van het commando RUN alle 
numerieke variabelen automatisch op 0 
worden gezet, en alle string-variabelen 
worden leeggemaa dus eigenlijk een 
waarde ”” krijgen. N/i^r toch is een derge¬ 
lijke initialisatie wel erg nuttig, omdat daar¬ 
mee in een vast gedeelte aan het begin van 
een listing alle in het programma te gebrui¬ 
ken variabelen op een rij worden gezet, 
waarbij met hulp van REM-commentaar de 
nodige gegevens over de variabele kun¬ 
nen worden geschreven. Als er dan later 
iets aan zo’n programma moet worden 
gewijzigd of toegevoegd, kan iedere pro¬ 
grammeur in één oogopslag zien welke 
variabelen er in het programma worden 
gebruikt en waarvoor. Daarom is het een 
goede gewoonte altijd te beginnen met 
een initialisatieblok. 

Daarna zijn er in dit programma (bewust) 
een paar regels opengelaten, omdat er in 
de loop van dit artikel nog wel wat aan het 
programma zal veranderen. 

De RND()-functie treffen we aan in de 
regels 140 en 180. Daar staat 
GT = RND(-I) en GT = RND(1). 

Regel 180 is de enige regel in deze listing 
waar het werkelijk om draait. Als we de 
eerste keer regel 180 runnen heeft GT de 
beginwaarde uit RND(-I). Na de uitwerking 
van RND(1), krijgt GT de waarde 
.328780872 of iets wat daarop lijkt. Deze 
waarde vinden we achter de string 'Getal 
0’ op ons scherm. Dit is de willekeurige 
waarde, die wordt 'gemaakt’ door de 
Commodore-processor als we de functie 
RaNDom aanroepen zoals we dat doen in 
regel 180. Verderop komen we hier nog 
wel op terug. Eerst regel 190. Daar wordt 
de waarde van GT op het scherm gezet, 
samen met de string "Getal” en de waarde 
van de variabele I. Let in deze regel ook 
eens op de plaatsing van de print-tekens 
de puntkomma en de komma en kijk wat 
ze doen op het scherm. 

Op de eerste schermregel staat niet voor 
niets Getal 0, want I heeft de waarde 0 
gekregen in het initialisatieblok. In de vol¬ 
gende regel (200) verandert dit echter, 
want daar komen we de opdracht tegen I 
= | + 1. Op het eerste gezicht voor de 


nieuwe Commodore-mensen misschien 
een vreemde opdracht, omdat het een 
rekenkundige tegenspraak lijkt, net zoiets 
als 2=2 + 1. Dit laatste gaat gelukkig niet 
op in de algebra, maar in Basic is zo’n 
schrijfwijze met variabelen volledig legaal. 
Je moet de waarde die variabele I heeft (0) 
zien als een gegeven dat in de Commodo¬ 
re zit opgeborgen in het laatje met de naam 
I. Wat er in regel 200 gebeurt is niet veel 
anders, dan de opdracht naar de Commo¬ 
dore van 'open lade I, bekijk de waarde die 
erin zit, tel er 1 bij op, en zet deze nieuwe 
waarde terug in laatje I.’ Door dit te doen is 
er 1 opgeteld bij de waarde van I, die 0 was, 
waardoor I nu de waarde 1 heeft. 

Dan komen we bij de laatste Basic-regel, 
die nog iets doet in dit programma, regel 
210, waar we een zogenaamde conditie- 
regel aantreffen, die een test uitvoert op de 
waarde van variabele I. 

We lezen in deze regel IF I < 10 THEN 
GOTO 180 

In gewoon nederlands vertaald staat er 
zoiets als: 'Wanneer de waarde van I klei¬ 
ner is dan 10 ga dan naar regel 180, en 
vervolg het programma vandaar’. Het laat¬ 
ste gedeelte, met de GOTO- opdracht ken¬ 
nen we inmiddels, maar de conditie IF .. 
THEN is nieuw voor ons. Wat er hier ge¬ 
beurt is het volgende: De Commodore test 
hier de waarde van variabele I tegen de 
waarde 10 en op grond van die uitkomst 
(conditie) wordt bepaald wat er verder gaat 
gebeuren. Is I kleiner dan 10, THEN (dan) 
GOTO 180, ga anders gewoon door met 
de volgende regel. Zodra I dus groter of 
gelijk is aan 10 zal regel 220 worden uitge¬ 
voerd, waarin de Commodore opdracht 
krijgt om het programma te stoppen 
(END). 

Vooralsnog heeft I de waarde 1, dus kleiner 
dan 10, en het programma gaat vrolijk 
verder met regel 180, waar een nieuwe 
toevals-waarde wordt gemaakt voor de 
variabele GT, die in regel 190 weer op het 
scherm wordt gezet, waarna I weer met 1 
wordt opgehoogd in 210 en de test weer 
wordt uitgevoerd in regel 220 enz. net zo 
lang tot er 10 keer een Randomgetal op het 
scherm is gezet. Als je het programma 
uitvoert, zul je dit zelf kunnen constateren. 
Om nu b.v. 20 getallen op het scherm te 
zetten, hoeven we niets anders te doen, 
dan de 10 in regel 220 te veranderen in 20, 
waarmee we de test laten uitvoeren op I, 
totdat I gelijk of groter dan 20 geworden is. 
We krijgen dan 20 keer een toevalswaarde 
op het scherm. Zo kun je ieder willekeurig 
getal op deze regel invullen, waarmee het 
programma ontzettend flexibel wordt wat 
betreft het aantal keren dat er een waarde 
aan GT woet worden toegekend. 

De RNDQfunctie 

Op het eerste gezicht lijken de willekeurige 


getallen de we met de computer kunnen 
maken niet zo interessant, ze zijn bijna 
allemaal negen digits lang, en hebben alle 
een waarde die ligt tussen nul en één. Wat 
kun je daar nu mee, zul je zeggen. 

Verder is het zo, dat het niet uitmaakt, hoe 
vaak je het programma ook RUNt, want 
iedere keer krijgen we dezelfde reeks ge¬ 
tallen op het scherm, dus zoveel toeval zit 
er in feite niet in. Dat is allemaal waar, maar 
toch is dit de basis voor een hele serie 
mogelijkheden met door de Commodore 
gemaakte waarden, waar we als program¬ 
meur ook maar naar moeten gissen. 

Voor we verder gaan wat theorie over de 
functie RND(). Zoals je ziet praten we hier 
niet over een opdracht, maar over een 
Functie. Dat betekent, dat RND() eigenlijk 
helemaal geen Basic-opdracht is, maar 
een rekenkundige bewerking, die met een 
bepaalde waarde wordt uitgevoerd. In de 
toekomst zullen we nog met veel meer van 
dit soort functies te maken krijgen, zoals 
LEN, MID$, INT, ABS etc. 

RND() hoort hier ook bij, en berekent een 
willekeurige waarde, die wordt toegewe¬ 
zen aan de numerieke variabele die bij de 
functie in het programma staat. In ons 
geval is dat GT. RND() maakt een nume¬ 
rieke waarde van 9 digits als decimalen, 
dus de waarde van dit getal ligt altijd 
tussen 0 en 1 . Zoals we zagen is er eigen¬ 
lijk geen sprake van echt toeval, omdat we 
iedere keer dat het programma wordt uit¬ 
gevoerd, dezelfde waarden op het scherm 
krijgen, al zijn ze stuk voor stuk erg klein, 
lang en verschillend. Ook is het zo, dat je 
duizenden keren regel 180 kunt uitvoeren, 
zonder ook maar 1 keer dezelfde waarde 
tegen te komen, zodat je deze functie 
eigenlijk wel als de maker van echt wille¬ 
keurige getallen kunt zien. 

We kunnen met RND() echter drie kanten 
op. 

1 - RND(-l) 

Als de RND() functie wordt aangeroepen 
(vgl.regel 140) met een negatieve waarde 
tussen de haken, dan krijgen we altijd de 
reeks getallen die we gezien hebben in ons 
programma. Schrijf er nog maar eens een 
kort programma voor zoals: 


110 PRINT RND(-I) 

120 PRINT RND(-2) 

130 PRINT RND(-3) 

dan krijg je op het scherm: 
2.99196472E-08 (regel 110) 
2.99205567E-08 (regel 120) 
4.48217179E-08 (regel 130) 


Prachtige getallen, iedere keer weer de¬ 
zelfde. Deze reeksen getallen zijn de uit- 
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Komsten die worden gemaakt naar de 
standaard RND-SEED, waarmee iedere 
Commodore-computer,na RUN, opstart. 
Deze SEED (zaad of kiem) is een bepaalde 
floating-point waarde, die de basis vormt 
voor alle berekeningen met de RNDQ- 
functie. Als we dus compleet andere getal¬ 
reeksen willen, dan moeten we eerst de 
RND-SEED wijzigen. Zoals de proef al laat 
zien, kan dat gebeuren door een ander 
negatief getal te kiezen. 

Je zult ongetwijfeld hebben gezien, dat er 
een hele vreemde schrijfwijze van deze 
getallen op het scherm is gekomen. Dit is 
de zogeheten wetenschappelijke notatie, 
waarbij met een Exponent wordt gewerkt, 
omdat deze getallen zo klein zijn gewor¬ 
den, dat het voor de Commodore niet meer 
mogelijk is de waarde in decimalen te 
onthouden en op het scherm te krijgen. Zo 
kan bijvoorbeeld het getal 100 worden 
geschreven als 1.0E+3 maar ook als 
0.1 E+4 en ook nog eens als 10.0E+2. 

De waarde 0.001 kunnen we wetenschap¬ 
pelijk noteren door te schrijven 1.0E-3 of 
10.0E-4. De computer gebruikt dit echter 
alleen, als er geen andere mogelijkheden 
zijn om binnen de beschikbare geheugen¬ 
ruimte voor de variabele de waarde op een 
andere manier te kunnen bewaren. 

Stoor je op dit moment maar niet teveel 
aan deze manier van schrijven, als je maar 
weet, dat er bijzonder kleine of hele grote 
getallen staan, zodra de computer met 
deze notatie op de proppen komt. 

2 - RND(l) 

Om de RaNDom-SEED te veranderen heb¬ 
ben we de opdracht RND() met tussen de 
haakjes een positief getal, van 1 tot 32767. 
Aan de hand van de waarde van dit getal 
geven we aan de Random- generator in de 
Commodore tijdens het runnen eenmalig 
een ander basis-getal mee, zodat de uit¬ 
komst van de met RND(1) gemaakte getal¬ 
len daardoor ook iedere keer anders zal 
zijn. We hebben dit al kunnen waarnemen 
in ons programma TOEVAL 1 ’ waar we in 
regel 140 de Random seed RND(-I) aan 
GT als waarde gaven, waarna we met een 
positief getal in de random-functie de wer¬ 
kelijke getallen hebben gemaakt. 

Meer variatie 

Je moet wel even goed naar deze lange 
reeksen getallen kijken, om enig verschil te 
zien, maar dan zul je merken, dat ze alle 
tien wezenlijk anders zijn, dan de drie 
getallen die in eerste instantie gemaakt zijn 
met RND(-I) etc. Een hele opluchting, want 
op deze manier hebben we tenminste 
meer dan 32000 mogelijkheden om het 
toeval een handje te helpen bij het maken 
van de getallen. 

Maar we zijn er nog niet. Probeer eerst, 
voor de aardigheid het negatieve getal uit 


regel 140 in TOEVAL 1’ eens te verande¬ 
ren in een ander getal kleiner dan nul, en 
bekijk zelf nauwkeurig het verschil in de 
diverse uitkomsten. Als je dat goed hebt 
gedaan, dan zul je met mij tot de conclusie 
gekomen zijn, dat de waarde van het nega¬ 
tieve getal bij de RND-functie bepalend is 
voor de reeks getallen, die vervolgens op 
grond van deze SEED door de Commodo¬ 
re wordt gemaakt. 

Maar het echte toeval moeten we er nog 
immer zelf aan toevoegen, door een be¬ 
paald negatief getal te kiezen, en dat in een 
beginregel van ons programma te zetten, 
waardoor er een bepaalde SEED voor de 
Random wordt geactiveerd. Er is gelukkig 
nog een ’waarde’ standby in de Commo¬ 
dore, die ons kan helpen, om een echte 
willekeurige reeks getallen te maken. De 
waarde tussen negatieve en positieve ge¬ 
tallen, dus NUL, kan ook worden gebruikt 
om een RANDOM-SEED te maken. Met 
RND(0) krijgen we getallen, die al echt 
lijken op toevallig door de Commodore 
gekozen waarden. Probeer het volgende 
voorbeeld maar eens uit: 


10 PRINT RND(0) 
20 GOTO 10 


Alleen bij het gebruik in spelletjes en der¬ 
gelijke, komt het nogal eens voor, dat ook 
bij het gebruik van RND(0) toch bepaalde 
sequensen met exact dezelfde uitkomst 
tevoorschijn komen. 

De klok als hulp 

Om werkelijk onvoorspelbare toevalsge- 
tallen te kunnen maken op de Commodore 
is er gelukkig een gemakkelijke, maar erg 
slimme truuk te bedenken. Dat gebeurt 
met hulp van een vaste Basic-variabele. 
Deze variabele zit standaard ingebouwd in 
de computer en heeft te maken met de 
interne klok. Deze klok kan worden aange¬ 
roepen met de variabelen Tl en Tl$. Als we 
bijvoorbeeld intypen PRINT Tl, dan zal de 
Commodore antwoorden met een getal, 
waarin de tijd (in zestigste seconden) dat 
de computer is ingeschakeld, wordt weer¬ 
gegeven. Dat geldt ook voor de string TIS, 
daar krijgen we de tijd echter niet als een 
numerieke waarde maar als string-varia- 
bele in uren, minuten en seconden op het 
scherm. Bij de RND-functie moeten we 
dus gebruik maken van Tl, omdat deze 
numeriek de tijd bijhoudt. 

Zo zie je, dat de waarde van de klok niet 

alleen hoeft te dienen om de tijd bij te 

houden. We kunnen hem bij het maken van 
de Random-seed goed gebruiken. We ne¬ 
men dan de waarde van Tl, maken hem 
kleiner dan nul, door er een minteken aan 
toe te voegen, en ziedaar, we beschikken 


over een perfect negatief getal, dat iedere 
keer anders is tijdens het runnen. De kans 
dat we daarbij een zelfde getal treffen is 
namelijk slechts 1 op de 24*60*60*60 of¬ 
wel 1 : 5.000.000 

De kans dat we nu identieke getallen ma¬ 
ken is te verwaarlozen. 

We veranderen dus regel 140 in het pro¬ 
gramma TOEVAL 1 in : 


140 GT = RND(-TIME) 


Runnen we nu dit programma, dan zien 
we, dat er iedere keer weer andere getallen 
uit de random-maker komen rollen. 

Echte getallen 

Je zult je nu afvragen wat we eigenlijk met 
al deze kleine gedecimeerde getallen moe¬ 
ten. Want wat heb je aan al die getalletjes 
die allemaal kleiner zijn dan 1. De oplos¬ 
sing hiervoor is niet zo moeilijk, als je 
bedenkt, dat het een peuleschil is voor de 
Commodore om deze getallen te verme¬ 
nigvuldigen. We kunnen bijvoorbeeld be¬ 
ginnen om de Randomgetallen eens te 
vermenigvuldigen met een factor 100. Als 
we dat doen in ons grote programma 
TOEVAL 1, krijgen we een nieuwe versie, 
die we voor de duidelijkheid TOEVAL 2 
noemen. 


10 REM = = = = = TOEVAL 2 = = = = = 
20 REM Een programma, waarbij 
30 REM willekeurige getallen 
40 REM door de Commodore worden 
gemaakt. 

50 REM Versie met verm.factor 
100 REM BEGIN PROGRAMMA 
110 PRINT CHR$(147):REM maak 
scherm schoon 

120 PRINT "Willekeurige getallen" 

125 REM initialisatie 

130 1 = 0 :REM I = teller 

140 GT= RND(-TI) :REM GT= klok-seed 

150 FC=100 : REM FC=verm.factor 

160 REM 

170 REM GT wordt toevalsgetal 
180 GT = RND(1) ★ FC 
190 PRINT "Getal I, GT 
200 I = 14-1 

210 IF I < 10 THEN GOTO 180 
220 END 


Kijk goed naar de veranderingen en pro¬ 
beer voor het runnen te voorspellen wat er 
gebeurt. Alle getallen zijn nu in ieder geval 
verschillend bij iedere run. Daarnaast lig¬ 
gen de toevals-waarden niet meer tussen 
nul en één, maar tussen 0 en 99. Dat komt 
van de vermenigvuldiging met FC. Het 
enige waar we .nu nog mee zitten zijn de 
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decimalen. Deze cijfers achter de komma 
hebben we meestal niet nodig, als het om 
toeval-waarden gaat. En, je raadt het al, 
ook daarvoor beschikt de Commodore 
over een functie. De functie INT( ). We 
zulfen in deze les alleen maar gebruik 
maken van deze functie, zonder dieper op 
de details in te gaan. INT( ) maakt van het 
getal een zogenaamd integer-getal. Dat 
betekent, dat de fractie (alles wat achter de 
decimale punt staat) van het getal wordt 
weggegooid. Er vindt dus geen afronding 
plaats, maar het getal 1.9999999 wordt 
door INT(1.999999) veranderd in 1. 

We veranderen regel 180 in: 


180 GT = INT( RND(1) * FC) 


Runnen we nu TOEVAL 2 opnieuw, dan 
hebben we ons doel bereikt. Er worden nu 
netjes 10 getallen gemaakt, waarvan we 
zelf vooraf de waarden ook niet kennen. 
De getallen liggen nu allemaal tussen -1 en 
100. Dus het kan in dit geval voor komen 
dat er een nul op het scherm verschijnt, 
terwijl het hoogste getal 99 kan zijn. 

Een raadspel 

Met de gegevens uit deze les zijn we nu in 
staat een leuk spel te schrijven voor de 


Commodore. We laten de computer een 
getal maken, dat ligt tussen -1 en 100, 
waarna we proberen in zo weinig mogelijk 
beurten dit getal te raden. We maken 
daarbij (natuurlijk) gebruik van de RND( )- 
functie, terwijl ook de INTO en de conditie 
IF..THEN er aan te pas komen. 


10 REM = == = = GETAL RADEN = = = = 
20 REM 

30 REM Het raden van een getal 
40 REM tussen -1 en 100 
50 REM 

100 REM BEGIN PROGRAMMA 
110 PRINT CHR$(147) :REM Scherm 
schoon 

120 FC = 100 :REM Verm.factor 
130 GT = 0 : REM Toeval-getal 
140 RA = 0 : REM Raad-getal 
150 GT = RND(-TI) : REM maak ’SEED’ 
200 REM BEGIN HOOFDGEDEELTE 
210 GT = INT ( RND(1) ★ FC) 

220 PRINT ”Vind het getal tussen 0 & 99” 
230 INPUT "Welk getal :”;RA 
250 REM TEST OP RA 
260 IF RA = GT THEN PRINT "GOED 
GERADEN.” : END 

270 IF RA < GT THEN PRINT "TE LAAG” 
: GOTO 230 

280 PRINT ” TE HOOG” : GOTO 230 


Het is leuk om wat te spelen met dit kleine 
spel-programma. Nog leuker wordt het 
echter, als je er zelf het nodige aan gaat 
toevoegen. Zoals het tellen van het aantal 
beurten, of de optie om ook ander grenzen 
aan de te raden getallen te geven. Als 
opdracht zou ik twee dingen willen vragen. 
Ten eerste, probeer een programma te 
schrijven, waarin meerdere Random getal¬ 
len worden gemaakt, waarna je de laatste 
twee random getallen opnieuw wilt terug¬ 
halen. Dit is niet zo gemakkelijk als het lijkt, 
maar één van de drie RND( )-mogelijkhe- 
den kan je erbij op weg helpen. 

Als tweede moet je eens proberen het 
programma ’Getal Raden’ te veranderen 
op een manier, dat alle beurten worden 
geteld en worden getest ten aanzien van 
het kleinste aantal beurten dat nodig is om 
het getal tussen de grenzen te raden. Pas 
het programma daarbij zodanig aan, dat 
de gebruiker de boven- en de ondergrens 
met hulp van een paar INPUT-opdrachten 
zelf kan intoetsen. Als je denkt voor deze 
problemen een slimme oplossing gevon¬ 
den te hebben, kun je hem voor plaatsing 
in deze serie opsturen naar de redactie van 
Commodore-INFO. Vermeld in de linkerb¬ 
ovenhoek van de envelop: Basic-raadspel. 
De makers van geplaatste oplossingen 
krijgen van ons een aardige verrassing. 
Sterkte bij het programmeren. J.B. 
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CËM 64 



1. ROCK 'N wrestle 

ƒ 

44,95 

2. COMMANDO 

ƒ 

43,95 

3. CmvP/SPRITEMACHlNE 

ƒ 

31,95 

4. fvERCENARY 2 

ƒ 

44,95 

5. RAM30 

ƒ 

44,95 

6. KCRGNIS RIFT 

ƒ 

44,95 

7. BCUnDER 

ƒ 

44,95 

8. KUNG FU MESTER 

ƒ 

44,95 

9. YIE PR KUNG FU 

ƒ 

39,95 

10. IsQV GPMES 2 

ƒ 

42,95 

Cavi 64 



The Last V8 

ƒ 

13,95 

Surrmergames 1 1 

f 

42,95 

Kickstart 

f 

13,95 

Re v s 

f 

57,95 

Llttle Computer People 

f 

43,95 

Expioding FIst 

f 

43,95 

Ballblazer 

f 

43,95 

wintergames 

f 

42,95 

Fighting Warrior 

f 

44,95 

They sold a Mi 11 ion 

f 

44,95 

Gameski1 Ier 

f 

69,95 

Dynami te Dan 

f 

34,95 

Transformers 

f 

44,95 

Batalyx 

f 

47,95 

Elite 

f 

77,95 


Databasis 

Zor r 0 

Shadowfire 

De Kapriolen 

Ho 11 andi11 s 

Radarbasic 

ƒ 48,95 
ƒ 61,95 
ƒ 46,95 
ƒ 44,95 
ƒ 22,95 
ƒ 89,95 

| CBM 128 

Cl28 DBASE 2 

ƒ 324,95 

C128 Multiplan 

ƒ 324,95 

C128 Wordstar 3.0 

ƒ 324,95 

C128 Databasis 

ƒ 69,95 

Practicalc (ook C64) 

ƒ 189,95 

Pract i file (ook C64) 

ƒ 189,95 

Superscript (ook C64) 

ƒ 309,95 

| CEM 16 

Beachhead 

ƒ 39,95 

Gamesdesigner 

ƒ 44,95 

Homeo f fice 

ƒ 44,95 

Kung Fu Zid 

ƒ 36,95 

Mega Zap 

ƒ 16,95 

Berks 3 

ƒ 34,95 

Paintbox 

ƒ 44,95 

Formula 1 

f 13,95 

Airwolf 

ƒ 34,95 

Wi nter 0 1 yrrp i cs 

ƒ 31,95 

Spaceinvader s 

ƒ 31,95 

BI agger 

ƒ 31,95 
ƒ 36,95 

D.T. Star Evenst 

Ro 11erkong 

f 31,95 


Bestellen door overmaking op NMB 68.53.65.778 t.n.v. Settle 
Light Soft o.v.v. de Titel(s). Verzendkstn. ƒ 2,-. Bij leve- 
ring ONDER REMBOURS ƒ 10,- verzendkstn. Levertijd gemiddeld 
10 dagen netto. U kunt onze catalogus bestellen door ƒ 2,50 
over te maken op NMB 68.53.65.778. Inl. 01150 - 17286. 
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